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POUR VOS COMMANDES TELEPHONIQUES , 1 SEUL NUMERO : 


(1). 48 65 44 55 


une méthode unique :: 
comprenant plus de cent exercices 


progressifs en rythme et en difficulté 


p> cours complet de dactylographie 
pour la maîtrise du clavier Azerty 
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D need us 
Développements DAMOCLES (cab. Bascle) 180.00 fm en en Ra. 
5150079 DAMOCLES vins boissons 1990.00 | M 250.00 ARE SR Ur nt à 
ÉÉRUANTESS qu 5150080 DAMOCOIFF salon de coiffure LE LION O0) 
RIMANTES. 20 (en a 5150081 DAMOCLES GARAGE gestion A0 80.00... 
554003 pr tar rt = 000 Q :c BDD rennes ect mes 
BAA00T DP 2007 Anne las ete 5150082 DAMOCLES PRESTATIONS SERVICE 1990.00 190.00 Code Posial: 
554005  LQ 3500 Amstrad 80 col 5150083 DAMOCLES SCIERIES COR LS 15000..." pe 
585001 120 D Chizen 80 co 5150087 DAMOCLES BIJOUTIERS 1990.00 ET CS 
OVERTURE 110 Citizen à LASER 5150084 Edition de Traites avec DAMOCLES 520,00 SU Le De aveu 
; ds 5150085 Relance impayes ecneancier DAMOCLES 520.00 |L£ _.. 
k 5150086 CABAMED Gestion Cabinet médical 1990.00 [IS 150.00 
+ préciaez 1e mode (2256-2612 ou 9512) é 5150088 SUIVI DE CHANTIERS Progiciel 3990.00 a: POTE rate dc nie 
5102262 _ 20 CLOCK CHESS - Jeu d'Echecs 180.00 O- 5150089 COMPILATION 7 jeux 24.83 À renvoyer à: 
*5102141 ACT 1 - Gestion de Fichiers 805.00 273 C.M.L. 3 rue des Vignes 
5102801  ALEX - : Système E xpert 350.00 70.60 T7520 Luisetaines Donnemarie Dontilty 
8109188 AUTOFORMANON ASSEMBLEUR + Lire 298.00 CS PR 
51031 + WALBASK - Util. u Dodrielss 353.43 Catalogue complet des produits PCW contre 3 
510354 AZERTY Pour apprendre le clavier 250.00 SNIP ART . 24.00 timbres à 2,20 F pour frais d'envoi - gratuit avec toute 
Hier Re ER as Les ! MOP-MBP Mini Bureau Professionnel . VA Temps fonct. 10/30 mn 4162.86 commande: 
#0 e . à A 
5102337 _C BASIC COMPILEUR- Utilitaire 649.00 PRO-TECN ment vous (non fourni. 100808 
ee ne re un d'Echecs À ere . ni 3 x CETTE PUBLICITE ANNULE ET REMPLACE 
435.00 OUT! 
5103564  DATAMAT - Gestion de Fichiers 395.00 1850.00 4 TOUTES LES PRECEDENTES. 
5150046  DBASE2 gestion base de données 789.90 320.00 150.25 DbŒ--mmmmm mme 771 nnnmmm 
5103423 DB COMPILER ateur DBASE II 790.00 180.00 | 
*5102361 TALOS DEVIS TRAVAUX 1960.00 ACE - Simulateur de vol Bombardier 220.00 
51023344 DR DRAW - D.AO. 649.00 MATCHDAY H - Jeu de football en 3D 180.00 
5102335 DR GRAPH - Fe ra 649.00 (0- FONT PACK 1 -5 polices pour SIGNWRITER 350.00 
*5103595  EXBASIC - Utiltaire graphieme 250.00 Qr* FONT PACK 2 - - 350.00 [== 
*5102496  DAMOCLES FACTURATION/STOCK 1755.00 (CJ« 350.00 — 
5102918 GESTION D'ASSOCIATION 1190.00 GESTION PLUS H - gestion commerciale 
5102297 GESTION DE FICHIERS 260.00 COMPTABILITÉ COMMERCANT O 
HR pins se paie < 
51041 J 
5104139  HEATHROW AIR T.C. - Jeu 185.00 ul satin rene 10.00 = 
5102919 _ L'INTEGRE 2 - Gestion de fichiers A110013 ‘ni dub au Baule 148.00 TD 
5104253 LECTURE EFFICACE . MEDIFISC - Comptabilité médicale 5310014 _ Introduction au Pascal et Turbo P 248.00 n 
5102794 LIGHT PEN - Styb optique+D.A.0. . WALL STREET - Gestion boursière 5310015 Amstrad Locoscript 110.00 — 
:5104006 MODULE CERFA - B 5310016 Amstrad CP/M Plus 148.00 © 
5114177 MULTIPLAN 5310019 Fichiers en BASIC 168.00 
*5104688 NEWS DESK INTERNATIONAL 5310020 Nouveaux jeux d'ordinateur en Basic 96.00 E 
5103408  NOSTRADABUR Prév. En ise A 5310026 Le Basic par la pratique 128.00 
His cute Re + Caisse enregistreuse ge * Uniquement po ÉCEre Le on ke 5311028  dBASE Il Applications 178.00 — 
a ur voir Convertisseur 
5102916 PAIE - Traitement de la Pale/Muitipian 59000 (pu Pre SIP, PRÉ SABRE Fe G 
5102336 PASCAL/MT+ - Compll.-désassemb. 649.00 Q 5250002 Rallonge imprimante 2 cables de 1m 190.00 L vd 
*5103118  PAYE CRESUS - Gestion de salaires 1174.14 5250003 Jeu de 3 housses luxe PCW 8256 350.00 © 
5103563 PCW GRAPH 395.00 () 5250004 Pied orientable muiti-directionel 350.00 
5102363 POCKET BASE - Base de données 790.00 S2ICA04 interface stick MX-770 250.00 > 
5102%6 POCKET CALC - Tableur 450.00 (]J‘52ADD18 Joystick MX-880 150.00 — 
5102184 POCKET WORDSTAR -Trai. de textes 890.00 ‘521102 Interface Série/Paral. imprim. AMSOFT 690.00 © 
*510359%  ROTATE 350.00 (‘521103 Interface RS-232 Imprim.+Minitel 590.00 
*5104003  STARGLIDER 30200 () 5211101 Ruban NOIR imprim. 8256/8512 85.00 O 
5103620 STRIKE FORCE HARRIER Simulateur vol 227.00 () 5211102 Ruban ROUGE RSR LR 150.00 is 
5102639 TELETUTOR - Apprentissage clavier 495.00 () 5211103 Ruban BLEU 150.00 ao 
5102875  TOMAHAWK Simulateur de voi en 30 225.00 5211104 Ruban VIOLET mere 150.00 © 
5103950 TOP SECRET - Jeu 295.00 5211105 Ruban MARRON 150.00 = 
5103699 TRIVIAL POURSUIT - Jeu 279.00 (© 5211106 Ruban VERT 150.00 
5150001 FICHE - Gestion de Fichiers 78988 () 5211107 Ruban ORANGE 150.00 
5150002 MAILING - Mailing 9 pour Locoscripti 450.00 5211108 Cassette ruban pour 9512 NOIR 65.00 = 
5150003  TASWORD 8000 - Trait Texte Pro 522.00 5215007 Disquettes 3 pouces CF2 AMSOFT 35.00 © 
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I CORRESPONDARCE | DIVERS SONDAGE 88 - Page 45 : Un succès sans précédent 
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articles de l'ECHO, demandes d'adresses ou de 
documentations doivent être formulées par écrit à 
I LOGI'STICK Edition en mentionnant sur l'enveloppe le service I 
I concerné. Le fait de joindre une enveloppe timbrée aux Il 
demondes techniques ne garantit pas une réponse directe 
(| de nos services, du fait du temps exigé par ce type de l Les Exclusifs : 
cormespondance. La rédaction tient tout de même compte 9 _!®5 EXC L 
I des questions posées dans le choix des rédactionnels. 





Décrits chaque mois dans des fiches techniques ls seront obtenus à l'aide du bon de 
commande du cahier central age 28) ou par téléphone (avec une carte Visa) 
LOGI'STICK Edition décline toute responsabilité quant aux Disquettes Echo: ous les programmes de ce présent numéro sont regroupés sur une seule et même disquette 


opinions formulées dans les articles, celles-ci n'engageant correspond ant au numéro du joumal. 
Î que leurs auteur. La loi du 11 MARS 1957 n'autorisant, aux | Anciens NUMÉTOS : Les anciens numéros de l'Echo du PCW sont encore disponibles à l'excepilon du numéro 2 dont 


termes des olinéas 2 et 3 de l'article 41, d'une part que ‘les nous ne Ivrons que des photocopies. 
I copies ou reproductions strictement réservées à l'usage privé D Rellure Echo : La rellure Echo est personnalisée au sigle du journal et permet de classer une année entière, so8 11 numéros. 
(| du copiste et non destinées à une utilisation collective’ et, l Pour vous procurer un ou plusieurs de ces offices, ulilsez ou recopier le bon de commande sub en page cenkale. 
d'autre part, que ‘les analyses et les courtes citations dans un ; Publicité : Le tarif! de publiché est disponible sur simple demande par courrier. 


Lou d'exemple et d'ilustration" * toute représentation ou Ê Papler à en-tête : Un échanilonnage de papier personnalisé peut être obienu par courier accompagné de 10 F en timbres. 


reproduction, intégrale ou partielle, faite sans le g Core: dance : Pour tout ndre el fm 
I corsentement de l'auteur ou de 1e5 ayonis droit ou ayants (| 'spon our Je correspondance, joi une enveloppe fimbrée pour une éventuelle réponse. 


I cause. est illicite” (alinéa 1 de l'article 40). Cette (| 
représentation ou reproduction, par quelque procédé que 

I ce sh, constituerait donc une contrefaçon sanctionnée par I 

! les articles 425 et suivant du code pénal. I 

] ISSN 0728-7648 I 


L'ECHO DU PCW © LOG/STICK 1988 En couverture : N'est-ce pas romantique tout cela 77? 


Lee = = ne ne en mn el 








NOS"REVENDELLS SPECRLÈES 





ESSONNE 








TOUT ARRIVE... 


Malgré le franc succès de notre voyage de noce à Vierzon. 
Malgré mes incomparables talents de géniteur forcené, 
Malgré, malgré, Germaine m'a quitté ! 





Stupido... 







A qui la faute ? À mon PCW.. 


Elle est donc partie jalouse, emmenant 
tous les gosses et j'ai failli mourir d'un 
chagrin sans limite quand me vint une 
idée. 

En un suprême sursaut, j'ai chargé 

Multiplan, coup de fil à l'INSEE, me 

voilà reparti. 

58634015 français dont plus de la moi- 
tié d'un sexe qui me convient. J'en 
retranchais, sans gêne, des pourcents de 
blondes insupportables, de celles aussi qui 
Pr n'aimeraient pas les matheux trop rêveurs, 
l 6} celles dont les couches sociales me faisaient fuir 
PO) 






de peur, les jeunes effarouchées, les trop près de la 
tombe pour me faire succomber, les mariées, les 
jetées, les épaules roulées et plein d'autres choses 
encore, quand mes calculs faits, j'en venais à conclure : 
Format L3C5, centrée sans décimale, la cellule avouait : 347.592 
Germaine célibataires susceptibles de prendre la relève sans me trau- 
matiser.. 


J'étais rasséréné par ce brillant calcul et chantais à tue tête : "Ah mon 
micro, mon micro, mon micro, tu es toujours là quand il le faut, ah mon 
\N micro, mon micro, mon micro, comme sans tes plans je serais idiot !" 


000000000000...) GILLES PROBST (.. ma non troppo) 
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GAGNEZ VOTRE ENT 


Organisée du 17 au 20 Novembre 88 par la ville 
de Niort, la Camif et la Maif, la seconde édition 
du Carrefour Media Jeunesse a toutes les 
chances de devenir un évènement majeur puisque 
s'étalant sur 6000 m2, ses organisateurs attendent 
près de 40000 visiteurs. D'importantes manifesta- 
tions sont prévues avec, entre autres, une rue de 
la télématique, des espaces logiciels, robotiques, 
musiques et livres. 

A cette occasion, deux concours sont organisés et 
concernent les informaticiens amateurs et profes- 
sionnels. Le premier, dont le prix n'est autre qu'une 
entreprise “clé en main", récompensera le meilleur 
logiciel éducatif. Le second, consacrera l'adapta- 
tion la plus réussie d'une oeuvre littéraire sur un 
nouveau support médiatique par la remise d'un 
prix de 30.000 Frs. En tant que nouveau moyen 
de communication, l'informatique peut donc pré- 
tendre à une participation active dans ce second 
concours qui, il est vrai, est beaucoup plus ouvert 
que le premier mais moins doté. Les opportunistes 
feront le meilleur choix et demanderont sans 
attendre, règlement et conditions aux organisa- 
teurs de ce nouveau rendez-vous des branchés : 


Carrefour Média Jeunesse 

Hôtel de Ville 

1 79022 NIORT 
© 49.79.00.34 


INTEGRALEMENT VÔTRE 


Pour dynamiser les ventes de PCW, AMSTRAD 
applique la bonne vieille recette de “l'intégral" qui 
consiste à offrir un pack de logiciel avec chaque 
machine vendue. Les logiciels retenus sont à ce 
jour : PCW GRAPH (graphique statistiques), MAS- 
TERFILE (gestion de fichiers) et ALIENOR (comp- 
tabilité). Bien entendu, ces trois logiciels n'ont 
aucun rapport les uns avec les autres, mais cette 
excellente initiative mérite tout de même une men- 
tion spéciale. 

Conclusion : il n'aura fallu que trois petites années 
pour sortir le PCW français de son carcan de 


he à écrire. On peut penser qu'AMSTRAD 
ANCE cherche à rattraper un énorme retard 
Mbarativement au marché anglais ou le parc 
PCWiste atteint le demi-million d'unités vendues. 


AMSTRAD : © 46.26.34.50 © 


PROCOMASS LAVE PLUS BLANC. 


Trop sales, trop gras, trop poussiéreux, les ordina- 
teurs souffrent et s'abiment plus vite qu'il ne le fau- 
drait en faisant courir d'inutiles dangers aux parties 
les plus sensibles : lecteurs de disquettes, impri- 
mante et clavier. Une société s'est spécialisée 
dans le toilettage de nos machines et c'est à l'aide 
d'un matériel de pointe qu'elle les nettoie là où la 
brosse n'arrive pas ! 

Dépoussièrage et dégraissage seront réalisés en 
un temps record à des prix très très raisonnables. 


PROCOMASS 

12 BIS RUE L.GAUTHERIN 

95100 ARGENTEUIL 

© 39.61.51.52 21 


IL N'Y A QUE MAIL QUI M'AILLE ! 


Elle a encore frappé ! ALTITUDE XXI prouve sans 
cesse la grande affection qu'elle porte au PCW. 
Non contente d'être le centre de formation 
AMSTRAD et d'organiser avec l'ECHO un super 
stage DBASE Il, cette dynamique société vient de 
mettre la dernière touche à un logiciel pédago- 
gique de premier plan : EAO MAIL XXI pour 9512. 
Sa louable vocation n'est autre que d'offrir, en une 
seule disquette, tous les exemples de ce que l'on 
peut tirer d'un LOCOMAIL. Particulièrement bien 
pensé, ce pack est une mine de trésors. Du plus 
simple, au plus complexe, on y découvre les 
moyens de réaliser circulaires, factures, relance 
personnalisation et autres subtilités jusqu'à l'inter- 
façage avec DBASE II dont l'explication aidera les 
utilisateurs à réaliser cette délicate opération. 


ALTITUDE XXI : © 43.56.05.50 D 
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D 010 276.070 976,076 970 0*0,916,076 00 216,0 0 ,00,076,00,0*6,016,070,076,076,076,070,2*6,910 070,270 
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L0*6,070,0*0,076,076,076,276,970,076,076,278,.270,. 270,070. 








L218,216,270,270.0*0,076,076,2"8, 070,016 





M6, 076,076,016.016,0"6,00,00,0"0,0"0,.2"6,976,076,076,076 06,06 ,010 0: ATX 


DATE : 3 & 4 DECEMBRE 88 

LIEU : PARIS 

TARIF NORMAL : 1800 F TTC” 

TARIF CLUB : 1650 F TTC° 

NOMBRE DE PLACES : LIMITEES A 20 
MAITRE DE STAGE : TONY LUZY 


9° - comprenant 2 repas, les collations, prêt du matériel, rapport et disquette de stage. 


- remise de 200 F aux stagiaires apportant leur matériel. 
-_ TVA Récupérable de 18,6%. 
- Stage pouvant être pris en charge par votre employeur dans le cadre du 1% formation. 


L076 010. 070,976,976,0%6,070,076,076,0 0,070, 070,2 70,976,976,976,976,010,076 076,976 ,070 070,276 ,0970 





D 016 010.070 270,976,076,076,216,916,0 6,00, 070.2 70,2"6,976,976,976,076 076,076 ,00 070,2 *0,970 070 






COTES 


Après une solide approche des méthodes permettant 
d'entrer des données sous basic, nous abordons à 
compter de ce numéro les douces subtilités du trai- 
tement proprement dit. Boucles, adressage et menus 
astuces qui ne feront que confirmer ce que nous 

savons tous déjà : 


nn one 00 000000000000 000 000 000000000000 000 000 000000 000000000000 000000000000 000000 D NN nn ne nn nes ns sn n nn en sense ee see 


PRINCIPE 


La boucle estune instruction qui se charge 
de répéter une opération autant de fois qu'elle le 
nécessite et ce, selon les ordres que nous lui 
communiquons. De plus, la boucle est toujours 
liée à un comptage numérique dont la maîtrise 
ajoute, au savoir basicien, la touche de style qui 
fait la classe du praticien. 


SYNTAXE 


Plus que simple elle se résume en trois 
valeurs dont une n'est pas obligatoire, soit : 


- Obligatoires : Valeur de début 
Valeur de fin 
- Optionelle : Valeur d'incrémentation 


(mon Dieu quel mot!) 
En basic on écrit : 
FOR VARIABLE=DEBUT TO FIN STEP PAS 
NEXT VARIABLE 

Ce qui veut dire : De la valeur DEBUT à la 
valeur FIN avec un PAS d'une valeur choisie 
(l'incrément) effectuer le traitement situé entre 
FOR et le NEXT. 

L'élément optionnel est l'incrément représen- 
té par la valeur PAS qui est 1 par défaut (par 
défaut signifiant si rien n'est précisé). 

CAS PRATIQUE 


Commençons par le commencement, à 
savoir charger le basic dans le PCW-en insérant 


Par Francois PAGE 


CODEODECEENCEPEECPOCECCEPCEOCE ECC COLCTEEEEEEN 


le basic mais c'est simple ! 


la disquette CP/M puis, à l'affichage de A>, à 
taper BASIC <RETURN>. Le BASIC est prêt 
quand apparaît "Ok". Nous pouvons démarrer... 


Nous voulons faire retentir le bip sonore 5 
fois avant de continuer un traitement quel-. 
conque : 


Tapons : 
FOR A=1 TO 5 STEP 1:PRINT CHR$ (7) :NEXT A 


Ce qui signifie : La variable A contiendra la 
valeur 1, puis 2, jusqu'à 5 avec un pas de 1 et 
fera sonner le bip (PRINT CHR$(7)) à chaque 
nouvelle boucle. 


Plusieurs commentaires se justifient déjà à 
ce stade de notre première expérience. Certains 
éléments de la syntaxe auraient pu être soit 
supprimés, soit modifiés sans gêner le déroule- 
ment de notre expérience sonore. 


Eléments supprimables : 

- STEP 1 : Comme expliqué plus haut STEP 
correspond à l'incrément qui étant à 1, si aucu- 
ne valeur n'est précisée, n'a pas lieu d'être utili- 
sé dans une boucle dont le pas est 1. 

- À de NEXT A : Autre subtilité du basic, le 
NEXT rencontré est toujours relatif à la boucle 
en cours. Par conséquent, dans un cas aussi 
simple, le nom de la variable n'est pas utile. 
En résumé : 

FOR A=1 TO 5:PRINT CHR$ (7) :NEXT 


fonctionne aussi bien. 
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Eléments modifiables : 


- À de FOR A et NEXT A : étant un nom de 
variable purement numérique, nous aurions pu 
mettre n'importe quoi à l'exception de mots 
réservés par le basic. 


Exemple : 
FOR TOTO=1 TO 5:PRINT CHRS (7) :NEXT 


- 1 de STEP 1 : inutile dans le cas d'un pas de 
1, cette valeur aurait pu être remplacée par un 
subdivision de 1 qui aurait permis de démulti- 
plier le nombre de boucles effectuées. Si nous 
avions mis .5 la boucle aurait eu lieu 10 fois 
puisque il faut dix fois .5 pour aller de 1 à 5. 


Exemple : 
FOR A=1 TO 5 STEP .5:PRINT CHR$ (7) :NEXT 


A vrai dire, il aurait été plus simple de faire 

.… une boucle de 1 à 10 pour obtenir le résultat que 
nous venons de voir, mais nous apprendrons 
plus loin quel intérêt le pas représente dans le 
traitement. 


BOUCLE DECROISSANTE 


Nous avons vu qu'une boucle partait d'une 
valeur N et augmentait par pas de 1 si rien 
n'était précisé par l'instruction STEP. Nous 
allons maintenant faire l'inverse en affectant une 
valeur négative au pas d'incrément. 


Exemple : 
FOR A=50 TO 0 STEP-5:PRINT A: :NEXT 


Cette boucle démarre à 50 pour finir à 0 et, 
comme l'affichage de A par PRINT A, nous 
vérifions aisément que la boucle peut décroître. 


VALEUR FINALE ET TEST 


Il'est une particularité du BASIC MALLARD 
qui mérite d'être connue car elle peut être mise 
à profit dans certains programmes. Elle concer- 
ne la façon dont le BASIC teste la valeur de la 
variable pour décider si la boucle doit continuer 
ou s'arrêter. Le BASIC MALLARD, contraire- 
ment à d'autres BASIC, incrémente la boucle 
avant de faire le test qui sert à vérifier si elle est 
terminée ou non. 


Exemple : 


FOR A=3 TO 33 STEP 3:PRINT A; :NEXT 


Ce programme affiche toutes les valeurs que 
prend I à chaque boucle. Un fois "Ok" revenu, 
ce programme est terminé. Vérifions alors le 
contenu de A par PRINT A et nous constatons : 
A est égal à 36 qui ne correspond à aucune 
valeur précédemment affichée et pour cause : le 
BASIC a ajouté 3, a testé la valeur de A et a 
déduit que A tait plus grand que 33 et par 
conséquent que la boucle était terminée. 
D'autres BASIC regardent d'abord ce que 
deviendrait la variable A si on lui ajoutait 3 et 
déduisent de ne pas le faire si le total est supé- 
rieur à la valeur finale. C'est sensiblement simi- 
laire à l'exception du fait qu'en sortie de boucle 
la valeur l'est, sur le PCW, toujours égale à la 
valeur finale plus le pas alors que sur d'autre 
machine, elle ne sera égale qu'à la valeur finale. 


IMBRICATION DE BOUCLES 





L'imbrication permet d'utiliser plusieurs 
boucles en cascade pour permettre certaines 
variations dans un traitement que le nécessite. 


Une règle fondamentale doit être respectée 
dans tous les cas d'imbrication : 


DEBUT BOUCLE A 
DEBUT BOUCLE B 
TRAITEMENT 

FIN DE BOUCLE B 
FIN DE BOUCLE A 


DEBUT BOUCLE A 

DEBUT BOUCLE B 

TRAITEMENT 

FIN DE BOUCLE A 
FIN DE BOUCLE B 


Une boucle commençant après une autre 
boucle finit forcément avant (voir illustration ci- 
dessus). 

Illustrons-le immédiatement... 


Exemple : 


10 FOR A=1 TO 10 

20 FOR B=10 TO 20 STEP 10 
30 PRINT A*B; 

40 NEXT B 

50 NEXT A 


Lancé par RUN <RETURN», ce programme 
est constitué de deux boucles A et B. Comme 
notre règle le prescrit, la boucle B finit avant la 
boucle A car le NEXT B devance le NEXT A. 
L'inversion des NEXT provoquerait une erreur 
indiquant par “NEXT MISSING" que le NEXT B 
n'est pas à sa place. 
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EE AS I! ENS 


Il reste toutefois possible d'intercaler des ins- 
tructions entre plusieurs FOR ou NEXT. 


Exemple : 


10 FOR A=1 TO 5:PRINT "BOUCLE A N° ";A 
20 FOR B=1 TO 3:PRINT "BOUCLE B N°";B 
30 NEXT B:PRINT "FIN DE LA BOUCLE B" 
40 NEXT A:PRINT "FIN DE LA BOUCLE A" 


Une rapide étude de ce qu'affiche l'écran 
pendant le déroulement du programme que je 
viens de donner, vous permettra de bien com- 
prendre ce qui s'est passé... 


Dans le cas où aucune instruction ne sépare 
les deux NEXT B et NEXT A, nous avons aussi 
la possibilité de les réunir en une seule instruc- 
tion qui aura pour effet de nous simplifier la vie 
en nous faisant gagner une précieuse place. 


Exemple : 


10 FOR A=1 TO 5 

20 FOR B=5 TO 10 STEP 2 

30 FOR C=30 TO 0 STEP-10 

40 PRINT A;:B;C 

50 NEXT C,B,A (au lieu de NEXT C:NEXT 
B:NEXT À) 


UTILISONS LES VALEURS DE LA BOUCLE 


Outre son aspect répétitif, la boucle peut 
aussi nous fournir une valeur qui augmente ou 
décroît suivant une valeur que nous connais- 
sons (Le pas). 


Exemple : 


10 FOR A=.3 TO .7 STEP .l 
20 PRINT 10000*A 
30 NEXT 


Cet exemple affiche le produit de 10000 et 
des valeurs successives de À comme nous 
aurions pu vouloir dans le cas d'un calcul de 
pourcentage. En somme, le programme calcule 
entre 30 et 70% par pas de 10%. 


QUAND LES VARIABLES S°Y METTENT 


Comme toute valeur numérique, DEBUT, FIN 
et PAS peuvent être placées dans des variables 
afin de pouvoir interférer, par programmes, sur 
le nombre de boucles effectuées sans avoir à 
retoucher sans cesse le programme. 

Exemple : 


10 INPUT “COMBIEN DE BOUCLE VOULEZ-VOUS"; LOOP ING 
20 FOR SCHTROUMPF=1 TO LOOPING:PRINT SCHTROUMPF ; :NEXT 
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Pas d'erreur, le programme affiche bien 
toutes les valeurs intermédiaires de la boucle 
qui nous prouve qu'elle a bien été effectuée 
autant de fois que nous l'avons souhaitée. 


NOMBRE MAXIMUM DE BOUCLES 


Après expérience, le nombre maximum de 
boucles imbriquées les unes dans les autres ne 
pourra dépasser 23 sans provoquer une erreur 
qui se manifestera par le message : 

"Memory full in. " 
Qui signifie, en clair, que la mémoire est pleine. 
Ce nombre de 23 est déjà très important et ne 
devrait être atteint qu'en d'exceptionnelles cir- 
constances. 


SORTIE D'UNE BOUCLE 


La sortie d'une boucle avant que celle-ci ne 
soit terminée n'est pas recommandée car elle 
peut provoquer des erreurs difficiles à identifier 
tant leurs apparitions sont aléatoires. Pourtant, il 
arrive fréquemment que pour les besoins de la 
cause nous ayons à quitter une boucle sans la 
terminer ; pour cela, un seul remède. Il suffit 
simplement d'affecter à la variable servant de 
compteur, une valeur au moins équivalente à la 
valeur finale initiale. Cette astuce reprenant mon 
commentaire sur la façon dont le BASIC teste 
une boucle, vous comprendrez immédiatement 
le fonctionnement de cet exemple : 


Exemple : 


10 FOR A=1 TO 100 

20 PRINT A 

30 IF A=50 THEN A=241 (c'est vraiment 
plus grand que 100 !) 

40 NEXT 


Tout est vraiment clair, la sortie s'est effec- 
tuée en douceur alors que A n'en était qu'à 50. Il 
ne faudra jamais l'oublier : On n'interrompt pas 
une boucle avant qu'elle ne soit normalement 
terminée sans provoquer une augmentation pré- 
maturée du compteur. J'avoue que même si 
nous sommes tous de sacrés conteurs à 
l'ECHO DU PCW, nous ne voyons pas souvent 
d'augmentations prématurées et je m'en passe- 
rai pour sortir de cette boucle | = 


ABONNEZ-VOUS 


C'est moins cher !!1 














J DISPONIBLE SUR PC ET COMPATIBLES 





Tout 
sur votre personnalité. 


ASTRO 1 


e Carte thème de 
naissance 

° Carte du ciel de 
naissance avec maisons, 
signes, planètes et 
aspects majeurs 

e Interprétation du thème 
de naissance 

e Personnalité profonde et 
ambition 

e Fichier de plusieurs 


centaines de personnes. 
Lun 





Sachez ce que l'avenir 
vous réserve. 


ASTRO 2 


Comme ASTRO 1 avec en 
plus : 


e Calcul et édition des 
révolutions solaires 
année par année 


e Carte du ciel de chaque 
Révolution solaire 


e Interprétation du 
potentiel de l’année : 
Amour, argent, travail, 
santé, etc. 

NI 





La version complète 
des initiés. 


ASTRO 3 

Version incluant ASTRO 2 
+ ASTRO COUPLE avec en 
plus : 

e Révolutions lunaires 


e Directions Primaires 
{avec pôles des planètes) 


e Directions Progressées 
et Symboliques 


e Calcul du Maître de 
Nativité selon la méthode 


de Volguine. 
ef) 


k 







N 


Découvrez 

votre entourage. 
ASTRO COUPLE 
e Carte du ciel composite 
e Aspects planétaires 

e Comparaison des thèmes 


° Interprétation des 
relations du couple 
{plusieurs pages) 
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LOGFISTICK Publicité 48 65 44 55 


RUBANS POUR IMPRIMANTES 
ÎTE SUPÉRIEURE 


RUBANS PCW 9512 MULTISTRIKE 
| LONGUE DUREE EXTRA NOIRS 


PAR 3 PIECES 
60 F L'UNITE* 


(SOIT 180 F TTC PAR 3 DONT TVA 18,6% = 28,23] 


S ‘MEMBRES DU CLUB ECHO 55 F L'UNITE 
(SOIT 165 F TTC PAR 3 DONT TVA 18,6% = 25,88) 


ET TOUJOURS POUR 8256/8512 
LES RUBANS SUPERS NOIRS... 


PAR 3 PIECES 
65 F L'UNITE* 


(SOIT 195 F TTC PAR 3 DONT TVA 18,6% = 30,58] 


* MEMBRES DU CLUB ECHO 60 F L'UNITE 
(SOIT 180 F TTC PAR 3 DONT TVA 18,6% = 28,23) 







ET LES RUBANS COULEUR LONGUE 
DUREE POUR PCW 8256/8512 
COULEURS DISPONIBLES : ROUGE, 
BLEU, MARRON, VIOLET, VERT, ORANGE 


BON DE CÉMMAND 














NOM : PRENOM : 
ADRESSE : A L'UNITE 
CODE : VILLE : 150 F* 





[PONT TVA 18,6% = 23,52) 


xX195F = * MEMBRES DU CLUB ECHO : 100 F L'UNITE 
= (DONT TVA 18,6% = 15,68 


0 — 
PR LIVRAISON IMMEDIATE [MAXIMUM 10 JOURS] 


COMMANDE PAR LA PRESENTE : 
______ x3 RUBANS NOIRS PCW 8256/8512 À 195 F LES 3 SOIT 
x 3 RUBANS NOIRS PCW 8256/8512 À 180 F LES 3 SOIT 
































________x3 RUBANS NOIRS PCW 9512 À 165 F LES 3 SOIT X165F = 

_______ x 3 RUBANS NOIRS PCW 9512 À 150 F LES 3 SOIT x 150 F9 = SIGNATURE OBLIGATOIRE 

COULEURS : x ROUGE x BLEU x MARRON x VIOLET X VERT x ORANGE 

________ _XRUBAN COULEUR PCW 8256/8512 À 150 F PIECE SOIT x150 F=__ 

_______ XxRUBAN COULEUR PCW 8256/8512 À 100 F PIECE SOIT ___x 100F° = 

AJOUTEZ LES FRAIS DE PORT : TOTALGENERAL : 

15 F POUR LA FRANCE - 30 F ETRANGER ET DOM TOM (PAR AVION) 

Ce ÉOGSTICK par LICHÉQUE | PANDA AE ] cer” _IVISAICARTE BLEUE Adressez commandes et règlement à 

NacaneleLte POLE SR TE 401 LOGI'STICK, CAPN Le Bonaparte 

alidité : / / Boîte 49 - 93153 Le Blanc Mesnil Cedex 








BANC D'ESSA 





ENTUA , 


et Marc HERMION 


À 


l'intégrateur LOVE, fourni gratui- 

tement avec la souris KEMPS- 
TON met, à la portée du PCW un 
concept de gestion de fichiers avec 
ses différents accessoires qui ont fait 
le succès du divin MACINTOSH 
d'APPLE. Sans être aussi performant 
(CP/M oblige) LOVE offre tout de 
même une incomparable souplesse 
que les néophites et autres rebelles à 
toute manipulation apprécieront à sa 
juste valeur... 


D etite révolution très attendue, 


VOOOOOUUOOOOOUOOOOOOOOOOOUVOOOO 
© L'INTREGRATEUR QU'EST-CE? © 
VOOOOOOOUOVOOOOVOOOOOOOOULOOOOOOCO 


Mis au point dans les laboratoires de RANK: 
XEROX et repris à son compte par APPLE qui en 
profita pour ralier à sa cause quelques uns des 
brillants esprits qui le conçurent, l'intégrateur visait 
à épargner à l'utilisateur toutes les manipulation de 
clavier qui caractérisaient (et caractérisent tou- 
jours...) la pratique d'un ordinateur. Pour être opé- 
rationnel et surtout efficace, l'intégrateur devait 
être manipulé à l'aide d'une souris sur laquelle un 
ou deux boutons servait simplement à manifester 
l'intention de l'utilisateur. 

L'utilité d'une telle méthode n'aurait pu se faire 
sans un tout autre type de visualisation. C'est ainsi 
qu'ils créérent une représentation de chaque 
constituant de l'ordinateur sous forme d'un gra- 
phisme simplifié ou icône. Chaque élément repré- 
senté, qu'il soit physique (clavier, imprimante, etc) 
ou logique (programme, fichier de données, etc) 
devenant alors un objet qu'un simple CLIC servait 
à sélectionner, qu'un mouvement servait à dépla- 
cer et qu'un double CLIC (deux clic d'affilé) per- 
mettait d'exécuter (dans le cas d'un programme). 
D'autres manipulations plus élaborées virent 
ensuite le jour, mais le principe fondamental resta 
qu'en dehors de tout apprentissage de l'ordinateur, 
un utilisateur néophite devait être capable d'effec- 
tuer des opérations aussi indispensables que 
copier un fichier ou exécuter un programme sans 


min et chaque 





avoir à comprendre ce qui se passe. Cette 
démarche est appelée maintenant "intuitive" par 
opposition à la démarche habituelle plutôt "acadé- 
mique" que l'épaisseur d'un manuel CP/M ne 
démentira pas. 

Aujourd'hui l'intégrateur a parcouru un vaste che- 





machine peut 
se vanter 
d'avoir le 
sien : GEM et WINDOW sur PC ou FINDER sur 
MACINTOSH, le PCW était indéniablement à la 
traîne. Cette lacune est maintenant réparée 
comme nous allons pouvoir en juger... 


VOVVOVVUOVVUVVUVOVOVOVOVOUOVOVOVOO 
© PAS DE LOVE SANS SOURIS © 
VOVVVVVVVVVVVVOVOVUOVVOVVVOVVVO 


Les talents d'un intégrateur ne peuvent vérita- 
blement donner leur plein sans l'utilisation de la 
souris. Comparativement à la souplesse de celle- 
ci, le meilleur clavier ne rivalise jamais pour ce qui 
est du déplacement à l'écran. Par contre, sa pré- 
sence reste indispensable ne serait-ce que pour 
taper du texte ce que la souris ne pourrait faire 
sans d'insoutenables contorsions dont l'index utili- 
sateur ne sauraitt se remettre | 
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5 ANC D'ESSAI 


La souris est donc la plus adaptée à toute opé- 

ration élémentaire comme sélection ou déplace- 
ment. 
Dans ce contexte, nous comprenons mieux l'inté- 
rêt de leur cohabitation même si certains détrac- 
teurs considèrent que le temps consacré à passer 
de l'un à l'autre fait perdre le temps gagné. C'est 
rarement vrai et la comparaison d'une manipula- 
tion comme la copie d'un fichier sous CP/M avec 
l'équivalent sous intégrateur suffira à convaincre 
les plus sceptiques : 


insérez la disquette système 
Taper PIP <RETURN> 

du disc récepteur 
Recliquer 

attendre que ça se passe 


Attendre l'affichage de “** 
Taper (sans se tromper) la 
commande de copie 
appuyer sur une touche 
pour sortir de PIP 
Respirer un grand coup 
ça a marché! 

Temps de l'opération 

20 secondes 


Passer une deuxième couche de 
verni sur la main gauche : c'est fait! 
Temps de l'opération 

2 secondes 


VOOOUOVOOOOUOVOVOVOVOUVOOUVOVOUOUVOVOOO 
© CE QUE FAIT LOVE © 
VOVVOUVOVOUOUOVVOOUVVOVOOUVOVOUVOVOOO 


Sans être aussi performant que ses grands 
maîtres, LOVE est capable de nombreuses 
choses tant au niveau des fichiers que des acces- 
soires de bureau qu'il intègre. 


Mis en place dès le départ, LOVE est résident 
et occupe environ 12300 octets. || est donc 
constamment présent mais il ne s'impose pas. 
Pour obtenir son affichage et toutes les fonctions 
qu'il inclut, pressons les deux touches de la souris. 
Une fois lancé, il s'affiche sur la partie basse de 
l'écran et représente fichiers et programmes 
d'abord et icônes des utilitaires de bureau ensuite 
(voir annexe ci-contre). 


VVVVVVVVVOVVVUVUVVVUVUOVVVVUOUVVVO 
© OPERATIONS SUR LES FICHIERS © 
VVVVVVVVUVVVVVOVVVVOVVVOUVVVO 


COPIE : Un clic pour sélectionner le fichier, dépla- 
cement sur l'icône représentant un des trois lec- 
teurs du PCW et reclic, le tour est joué. 


EFFACEMENT : idem que pour la copie mais c'est 
la poubelle qui sert de réceptacle (si vous n'appe- 
lez pas ça de la gestion intuitive je change de 
métier!) 


EXECUTION : Double clic sur le programme. 
LOVE demande si vous désirez entrer une option 
(exemple : Une commande à exécuter immédiate- 


INTEGRATEUR | 
| 


Cliquer sur l'icône du fichier à copier 
Déplacer l'icône du fichier sur l'icône 





ment sous DBASE) et lance le programme exacte- 
ment comme si nous avions tapé son nom sous 
CP/M. 





en À cs} 


2) On superpose les 3) Re-clic la 
fichier sur le disque copie est faite 


D [ai sur le 
fichier à copier 





Une fois le programme lancé, LOVE reste acces- 
sible à tout moment par une pression des deux 
touches de la souris. 

DIRECTORY : le contenu de toute disquette est 
affiché en cliquant sur la représentation du lecteur. 
Dans le cas où le nombre de fichiers est très 
important, nous cliquerons sur les flèches de mon- 
tée ou de descente prévues à cet effet. 


Les opérations comme renomer ou la gestion 
hiérarchique des fichiers, bien connue sur PC et 
MACINTOSH, ne sont toutefois pas accessibles, 
mais pour terminer sur un plus, signalons que 
LOVE gère les lecteurs disponibles et nous 
épargne les sampiternels "ignorer Annuler R.." 
en refusant tout simplement d'effectuer une opéra- 
tion sur un lecteur indisponible. 


VOVO0VOVOOUVOVOUVOVOOVOVOVOOOOUVOOUOO 
© LE BUREAU © 
VOOVO0VOVOOUVOUVVOVVVOVVOOUVUVOVOVOOVOO 


Egalement accessibles à tout moment, les 
accessoires de bureau ne sont pas des chet- 
d'œuvres de technicité mais ils ne peuvent être 
ignorés du fait de l'aide qu'ils ne manqueront 
jamais d'apporter. 













ROM1.CEN MON42.CEN 


LETTER.DOC  SCRDUMP.CEN 


MC) (@) à HE À 


VOOVOOOUOUOOUOUVOVOUVOOVOUOUOUUUVOUUUOO 
© LA CALCULATRICE © 
VOVVOVOVOUOOUVOOVOUVOOVOUVOVOUOUVOVOC 


TUE 


BUC.LSP TEST.BAS  SCRDUMP.CM 


PROFILE,SUB  NOTEPAD.AK 





LIN. CM CE. CH 








Pas de fonction scientifique, une mémoire pour 
faire joli, la calculatrice accepte 10 chiffres et se 
manipule avec la souris. Utile pour vérifier un taux 
de TVA ou faire une opération simple, il ne faudra 
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pas attendre de sa part 
des prouesses mathé- 
matiques. N'attendez : 
pas, non plus, le gran- 
diose “couper/coller" 

qui fait le charme du 
MACINTOSH. LOVE 
en est incapable et ce, 
quelque soit l'outil de 
bureau utilisé. Absence 
peu surprenante si 
nous tenons compte de 
la taille qu'aurait pris le 
programme final. 





VOVOVVOVOUOOUVOOUVOUVOUUVOUOOUOOVOVOOCO 
© LE CALENDRIER © 
VOVOVVOUVOOUVOVVVOOVUVOUUOVOOOUOUUVOVOOCO 


Plutôt pratique, le calendrier perpétuel offre 
toutes les années de 
ce siècle et de ceux à 
venir, mois par mois et 
jour par jour. Il n'est 
pas lié à un agenda qui 
aurait été très utile 
pour les rendez-vous 
et autres plannings 
comme le proposait 
COMPAGNON décrit 
dans l'ECHO 5. 


hi September 1989 


| 


TEsterter EUIE 


‘16.4 


VOVOOOVOOVOUVOVOVOOUOUOUOOUOOUVOOOOVOCO 
© LE NOTEPAD © 
QOO0VOVOOOUOOOVOOVOVOOUOVOOVOUOVOOUVOOO 


Servant à mettre des petites notes pouvant être 
relues à tout moment, cet outil n'est pas particuliè- 
rement transcendant au niveau des possibilités 
d'édition. N'offrant aucune recherche par "mot-clé" 
Fa rvr i d nous éviterons de 
el est le LOVE 'TOP sur PCK “A le remplir SMS 1r0p 

l ne faut pas oublier de lancer] d'informations au 
LOUE pour pouvoir s'en Servir. .| risque de ne plus 
savoir où elles se 
| trouvent. 








OO0VOVOUOUOOVOOOUOUOOOOVOUOOVOVOOUOUOOOOO 
© L'AGENDA © 
VOVVVOVVVOUVUOULOUOOOUUOUOUOOVOUVVOOO 


identique au NOTEPAD, l'AGENDA permet 
toutefois d'accéder aux pages en donnant la lettre 
qui sert d'index de classement. Limité en place ne 
comptons pas sur lui pour gérer un fichier clients 
mais c'est fort agréable pour les numéros de télé- 
phone courants que nous pourrons consulter n'im- 
porte quand. 


VOVODOOVOVOVOUVOVOOVOVOOUOUOUOVVOVUOVOVOOO 





DR 
RSA EURE | 
: a souris KEMPSTON déjà présentée dans l'ECHO N°13 était 
, -‘Vrée sans intégrateur et leurs possesseurs pourront l'obtenir | 
! séparément auprès de LOGI'STICK contre la somme de 250 F 
(disquette et port compris) si l'achat de la souris date de plus | 
de 3 mois ou 50 F s’il est inférieur à ce délai (copie de facture à ; 
! l'appui, paraît-il...) | 
Les programmes utilitaires permettant la redéfinition de la sou- | 
! ris pour qu'elle puisse fonctionner avec DBASE, MULTIPLAN, ; 
BASIC etc, sont toujours présents sur la disquette livrée avec | 
celle-ci. 


j 
} 


pq. 


| 


VVVVVVVVVVVVVVVVVVVVVVVVVVVVO 
© L'HORLOGE © 
VOVDVVVVVVVVVVVVVVVVVVVVVVVVVVO 


Comme tout intégrateur qui se respecte, l'horlo- 
ge est mise à l'heure dès le départ et reste affi- 
chée si aucun ordre contraire n'est donné. 
N'offrant pas d'alarme, son utilisation restera limi- 
tée à l'affichage de l'heure. 





PR AR SOLE An © DD TN ere nn Que CN LU RP Die 0 NUM] 
Apr icônes... 
TPbank 8 : 

| 

programmes programmes fichiers fichiers tous les  : 
basic CP/M assembleur textes autres 

Ext. :BAS COM GEN DOC ou TXT | 
MAC ou ASM | 

LOVE affecte un graphisme d'icône à chaque type de fichier et cela 
en fonction de son extension. Dans cet encadré figurent les cinq 
sortes disponibles qui suffisent à répertorier 80% des fichiers que 

| nous avons l'habitude de rencontrer. | 
| 


VYVVVVVVVOVVVVVVVVVVVVVVVVVVOO 
© CONCLUSION © 
VYVVVVVVVVVVIVVVVVVVIVVVVVVVYUVO 


Sans prétendre donner aux PCWistes la sou- 
plesse que l'on connaît aux intégrateurs les plus 
puissants, LOVE est tout de même fort satisfaisant 
quant aux prestations d'ensemble. La simplification 
alliée au gain de temps qu'il apporte le rendront 
vite indispensable .à ses propriétaires. 

C'est ça l'amour ! œæ 
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Par Pierre PAND 






Chose promise, chose due ! 


Voici, en avant première extra-ter- 
restre, ma réplique à l'arrivée de 
ZAZA dont mon PCW finit à peine de 
se remettre ! 

Max mon amour, n'est autre que le 
caméléon le plus glouton de sa géné- 
ration et sa compagnie risque d'en- 
traîner bien des drames au sein des 
familles les plus équilibrées. Je vous 
aurai prévenus... 


moins de faire partie de la race des privi- 
JA qui reçoivent chaque mois leur 

petite disquette ECHO soigneuseument 
emballée dans son cocon douillet, vous allez 
commencer par une petite partie de dactylogra- 
phie. Saisissez avec délicatesse et respect le pro- 
gramme ci-contre et respirez profondément entre 
chaque ligne. Vous n'oublierez surtout pas d'évo- 
quer régulièrement mon nom afin que le ciel me 
réserve la meilleure place (près du poële, c'est 
bien connu...). | 


Si la saisie vous incommode n'hésitez pas à 
consulter le bréviaire des tirlipoteurs de claviers 
sans défense situé en page 56. 


JEU SUIT DONC J'EPANCHE 
Par DESCARTES A JOUER... 


Le chef d'oeuvre étant digéré par ce monstre 
verdâtre qui vous fait face, vous allez pouvoir 
goûter aux extravagantes émotions de mon génie 
informatique. 





Lancez par le RUN de circonstance et admi- 
rez la présentation. Du grand art, merci ! 


Vous disposez de cinq niveaux allant de 1 : 
Nouille à l'eau à 5 : Affamé prétentieux... 


Chaque niveau multiplie la difficulté de ce 
jeu que l'académie des sciences n'hésitera pas à 


homologuer quand on 
m'aura enterré. 


Maintenant, les choses 

sérieuses commencent... Un insecte libidineux 
frétille impudiquement sur l'écran. Vous (laissez- 
moi vous appeler Max, si, si ça me fait plaisir...) 
pouvez vous déplacer à l'aide des flèches de cur- 
seur haute et basse et tirez ce qui vous sert d'ap- 
pendice linguale à l'aide des touches numérotées 
de 1 à 9. Ne me demander pas laquelle, c'est tout 
le but du jeu ! 


Les scores sont comptabilisés avec méthode 
et les nuls pourront même obtenir des scores 
négatifs ! Les records sont mémorisés dans un 
fichier nommé RECORD2.CH que vous efface- 
rez sous BASIC ou CP/M pour le remettre à 
zéro par ERA RECORD2.CH <RETURN:. 
Pour terminer sur une note culturelle, je tiens à 
vous faire remarquer que la valeur servant de 
base de calcul au générateur de nombre aléatoire 
est mise dans une variable appelée ALEA dont 
le contenu change en fonction du temps que 
vous mettez à presser la touche quand le pro- 
gramme vous le demande. N'est-ce pas astucieux 
tout cela ? 


Bon appêtit et bises aux petits... Slurprrr ——# 





Le programme 
MAX.BAS se trouve 
sur la disquette 
ECHO N°22 





[Tous nos remerciements à la société CAMELEON pour le prêt 
de son logo en guise d'illustration à cet article exceptionnel ! 


CEE 





REC MAX LA FOLIE + L'ECHO DU PCW N°22 








II: TE LLLELLLLELELELELELLLLCLIZLLELLL 


2OeREMetoosossooosoosenooosooesoces ect 
30+REMetooosesoMAXeLA+FOLIEseseeoeocot 

CD OO EEE. 
50+REM°* Par +Pierre + PAND=-------=--- * 

(UD TA CEE EE CECECEOEEECECEECCES 
F0+REMetooee (c) *eLOGI'STICKe19BBeeeoeot 

DT OREEEEEEEELELEEEEEEEEEEEEE ECTS. 

ID A CLELELELELELEEELELEEEEESSES ESS SES 

100*! 

110+'+INITIALISATION DES VARIABLES 

120! 

130+CLEAR' + (E3) 

140+A$="ALFRED":B=3000:1F+FINDS ("RECORD2.CH",1)=""+THEN°OPEN 
+0", 1, "RECORD? .CH":PRINTe#1,B,AS:CLOSE + (CL) 
150+OPEN°"1",1, "RECORD2.CH°*: INPUTe#1,REC, RECS : CLOSE! + (BU) 
160-ESC$=CHRS (27) : CLS$S=ESCS+"E"+ESCS+"H* :DEF FNLOCS (Y, X) =CHR 
(27) +"Y"HCHRS (32+Y) +CHRS (32+X) : MAXS=" HE =" :A$= "MAX ° LE CAMELE 
ON+FOU":Y=16"+(XE) 

170. 

180 +" PRESENTATION DU+JEU 

190! 

200+WIDTH+255: PRINTCLSSFNLOCS (Y, 1) ; MAXS' + (UL) 
210+FOR+A=1+T0+19:B$=MIDS (AS, A, 1) :FOR+B=75eTO+22+At2+STEP-1]: 
PRINT+FNLOC$ (17,B)B$"+";:NEXTeB, A! + (VB) 
220+PRINT+FNLOC$ (17, 44) *e*FNLOCS (16,44) "E":FOR+A=4+TO+43:PRI 
NTeFNLOCS (16,A}"-";:NEXT' + (LU) 
230+FOR°A=43+TO+ 4 + STEP-1 :PRINTFNLOCS (16,A); "Ee"; :NEXT:PRINT 
*ENLOCS (16,4) "+Slurprrre!!1®:FOR°B-0+T0+999:NEXT:PRINTeFNLOC 
$(16,5)"J'ai+faime !"SPACES (15) "Queleniveau-oses-tuetenter+?" 
FNLOC$ (17,22}"*de+ (1) Nouille-àel'eaueà+ (5) Affamé-prétentieu 
x..,"!e (TO) 

240! 

250+'+CHOIX*DU+NIVEAU+DE JEU 

260! 

210+A$=INKEYS' + (KF) 
280eNIV=VAL(INKEYS) : IFeNIV<I °OR°NIV>5° THEN +280" + (2X) 
290-PRINTeFNLOCS (16, 4) “Quel ecourage + ! "SPACES$ (45) FNLOCS (17,2 
2)"Presse*une-touche*pourdémarrerce* jeussubtil...""+(3C} 
300." 

310" MISE EN + PLACE +DU+JEU 

320+' 

330+A$=INKEYS" + (KC) 

340°A$=INKEYS: IF °A$=""+THEN°ALEA=ALEA ] : GOTO +340! + (25) 
350°RANDOMIZE + ALEA : PRINT eFNLOCS (2, 61) "Essaie : "FNLOCS (4, 60) "T 
iming+ : "FNLOCS (6,61) "Scores: +eeseQ"FNLOCS (8, 57} "Recordman:: + 





“RECSFNLOCS (10, 60) “Record: : "REC; FNLOCS (12, 60) “Niveaue:evve" 
NIV'e (TC) 
360-PRINTFNLOCS (17,22) SPACES (50) FNLOCS (16,5) "Compte +à+rebou 
rse:":FOR+°A=9eTO+0+STEP+-1 : PRINT +CHR$ (7) FNLOCS (16,22)A; :FORe 
B=0+TO+99:NEXT+B,A°'e+{1R) 
370°PRINT+FNLOCS (16, 5) SPACES (20) ' + (EH) 

380! 

390 +" + TESTeDES + TOUCHES *ET+DECOMPTE 

400! 

410+FOR+A=1 T0 +20: PRINTeFNLOCS (2, 72) ;USING"##";A:Y1=INT(1HRN 
D (ALEA) #27) :X=3+NIV*INT (1+RND (ALEA) #9) :FOR+B=200°TO+-50° STEP 
°-NIV:PRINT+FNLOCS (4, 71) USINGe"###";B; :PRINTeFNLOCS (Y1,X)"*" 
"+ (1B) 

420+A$=INKEYS : IF °A$=""eTHEN° 510" + (BW) 

430+1F +A$=CHR$ (31) *ANDeY>0eTHEN°PRINTeFNLOCS (Y, 1) SPACES (3)FN 
LOC$ (Y-1,1)MAX$; :Y=Y-1 :GOTO+ 510! + (OL) 

440+1F +A$=CHRS$ (30) ‘AND+Y<28°THEN°PRINT+FNLOCS (Y, 1} SPACES (3)F 
NLOC$ (Y+1,1)MAXS; :Y=Y+1:GOTO +510" + (21) 

450" 

460+ * » TOUT DANS + LA + LANGUE + ! 

470! 

480 +" eJACK+PEUT+ETRE *REMPLACE PAR+FRITZ+ (NDA) 

490+JACK=VAL (A$) : LANG=JACK*NIV+3:IFeJACK=0+THEN° 510" + (BR) 
500+FOR+C=4+TO+ LANG: PRINTeFNLOCS (Y,C)"-";:NEXT+C:IF°LANG=X+A 
NDe+Y=Y1eTHEN+PRINT+CHR$ (7) :FOR°C=LANG° TO + 4 °STEP-1 : PRINT+FNLO 
C$(Y,C)"*e%; :NEXTeC:PRINTeFNLOCS (Y,C+1)"e"; : GOTO+520+ELSE +B= 
B-NIV*10:FOR°+C=LANG + TO +4 :STEP-1 : PRINTeFNLOCS (Y,C)"+";:NEXT'e 
(P2) 
510+PRINTeFNLOCS (Y1,X) "+"; :NEXTeB:PRINTeFNLOCS (Y1,X) "eo"; tell 
G) 
520+SCORE=SCORE+B* NIV: PRINTeFNLOCS (6, 68) ;USINGe"##4##4": SCOR 
E;:NEXTeA' + (81) 

530" 

540 +" eFIN+DE +JEU +-+ SAUVEGARDE + DU RECORD 


_ ETTE 
(assé de saisir ? 





Commandez /a disquette 111 
(c'est en page centrale) 


560°PRINTFNLOCS (Y,4) "+C'esteterminé-!..."CHR$ (7)CHRS (7) CHRS 
(7): FOR°A=1 ° TO 2500: NEXT' + (N3 

370+ IF +SCORE>REC *THEN°PRINTeFNLOCS (Y, 5) “Quel est tonenomepet 
it erecordman"; : INPUT -NOMS : NOMS=LEFTS (NOMS, 14} :OPEN°"O",1,"RE 
CORD2.CH":PRINTe#1, SCORE, NOMS + (2H) 

580! 

590 +" e TEST *POUR°REJOUER 

600" 
610*PRINT+FNLOCS (Y, 5} "Veux-tuevraiment re jouer + (0}uiou+ (N}o 
ne?"*SPACES (15) "+ (F1) 

620+A$=UPPERS (INKEYS) : IF +A$="N"+THENePRINTeFNLOCS (Y, 5) "Adieu 
singrat..."#SPACES (30) ; :END' + (XR) 

630 IF +A$C>"O" THEN 620! + (V5) 

640-RUN' + (B3} 


MAX LA FOLIE + L'ECHO DU PCW N° 22 ES 7e | 
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Chers amis PCWistes, bonjour ! 


Revenant de Birmanie où le peuple exige le retour du Shah, en pas- 
sant par Séoul où les entrainements ont déjà commencés, grâce à la 
bonne volonté d'étudiants soucieux d'assurer une ambiance réussie, 
j'avoue avoir passé d'excellentes vacances, durant lesquelles j'ai pu 
perfectionner mon art : le fouet ! 


ae A Cros COSQULEES nn nee 
ALBERT DUROUX, responsable du courrier, êtes accusé d'avoir saboté 
| la meilleure partie de celui du mois a En effet, non seulement 
teur. ABIGNOLI mais en 

C otre propre tuyau... 
1 Ouh que c'est laid. D Coups s ï: n'y Changeront rien. 
L |] fallait lire : POKE &H73BA au lieu de &H73BA tout seul 

Mais pire, c'était SAVE M: TOTO”, À au 1eù de AVE "M: RTOTO”. 

Au suivant | = 













2036 obtenu, à la force de son poignet gauche au d'étènd jeu du 
1 SNAKY. Pire encore, PATRICK GOUJON révèle, avec copie d'écran cer- 
J tifiée conforme par la mairie de SAINT-BICLOUNETTE SUR MELLOUL le 
| score phénoménal de 430 sur ZAZA (C'est du propre 1). Encore bravo 
let qu'ils servent d'exemple pour MAX qui devient, à compter de ce 
| numéro, le nouveau challenge des joueurs de fond... 





I 

: 1000 Francs de prime à l'exraofähaire MENU.BAS dont l'auteur PIERRE 
| CORBARA peut être fier. 

l 





l 

l''Les postulants à la super prime de 5000 F ne sont pas suffisamment 

nombreux", a déclaré le chef, lors d'une prestigieuse conférence de 

presse donnée à la cantine du personnel. Envisageant une annulation 
pure et simple, il a fallu limplorer, avec grosses larmes et incantations 

y divines, pour qu'il renonce à cette folle idée. Je suisconvaincu que 

p VOUS ne nous abandonnerez pas dans la douleur et, qu'unanimement, 

p d'un mot, d'une phrase, d'une chanson ou même d'un poême, vous 

| participerez !!! 

I 

1 Sur ce vibrant appel, je vous laisse en compagnie de ce merveilleux 

l journal dont certains articles, courts mais bons, méritent le coup de 

langue. Foi de PAND ! = 


[ 
I 
[ 
] 
| — Imprimé avec ROTATE 


D 18 INTERACTIF + L'ECHO DU PCW N°2 





déclaration fiscale 


VIDEO SHOP. 50 rue Richelieu 75001 PARIS 


Tél. : 42 96 93 95 - Métro : Palais Royal 


VIDEO SHOP. 251 boulevard Raspail 75014 PARIS 


Tél. : 43 21 54 45 Métro : Raspail 


L'ESPACE LE PLUS MICRO DE PARIS ! 


MATERIEL 
PCW 8256 
PCW 8512 
PCW 9512 


Une demi-journée de formation gratuite ! ! ! 


- Formation assurée 

- Maintenance assurée 

- Crédit et facilités de paiement 
- Un CLUB (-10%) 


- Interface manettes 

- Extension 256 Ko 

- Lecteur FD2 

- Digitaliseur VIDEO 

- Emulateur MINITEL-MYNEA 
- Serveur MINITEL-SYNEA 

- Souris PCW 

- RS 232 C 


- Housses protection (les 3) 

- Prolongateur imprimante 

- Disquettes CF2 (les 10) 

- Disquettes CF2 DD (les 10) 

- Ruban imprimante 

- Ruban imprimante PCW 8256 et 9512 
- Marguerites pour PCW 9512 


- ASTRO 1 450 
- ASTRO 2 950 
- ASTRO 3 990 
- BOURSE 2000 850 
- HERAKLIOS 350 
- WALL STREET (BOURSE) 790 
- COMPTABILITE ALIENOR 055 
- FACTURATION STOCK 750 
- PAIE LOGICYS 150 
- MULTIPLAN ENT 
- DBASE Il 790 
- POCKET BASE 690 
- POCKET CALC 490 
- QUICK MAILING ENT 
- AZERTY 290 
OZ NON 290 
- ROTATE 350 
- EXBASIC 250 
- OPTICAISSE 990 
- PCW GRAPH 395 
- DATAMAT PCW 590 


U;l: 0h27 CTe7. VE 740 
- TURBO TUTOR 390 
- TURBO PASCAL GRAPHICS 940 
O0): 0) 740 
- AUTOFORMATION ASSEMBLEUR 295 
- LANGAGE C (en anglais) 790 





LOGI'STICK Publicité (1) 48 65 44 55 


JEUX 


- BATMAN 

- BOB WINNER 
Dolds113 

- STRICKE FORCE HARRIER 
- TOP SECRET 

- TRIVIAL PURSUIT 

- TOMAHAWK 

- 3D CLOCK CHESS 

- MATCH DAY Il 

- GUILD OF THIEVES 

- THE PAWN 

- TETRIS 

- BRIDGE PLAYER 2000 


BIBLIOGRAPHIE 


- Bien débuter avec PCW 
- Grand livre du PCW 
- Gestion sur PCW 
- MULTIPLAN Entreprise 
- DBASE Il Application 
PCW PAINT 
DA 7e) 
MOP-MBP 
GRAPHIC MAGIC 
LOCOSCRIPT 2 


LIVRAISON 
- Matériel par SERNAM Express : 48 h (Port 100 F) 
- Logiciels par Postes Express : 48h (Port 15F) 


PRIX au 01.07.1988 susceptibles de modification, sous réserve des stocks disponibles. 


BON DE COMMANDE à adresser à VIDEOSHOP, Dept VPC - B.P. 105 - 75749 PARIS Cedex 15 











NOM _ — L Je règle par Désignation des . 
C. Bancaire articles s 
PRENOM — —— CCP démandés:...:,...s Si: 
Visti 
ADRESSE DEMANDE DE DOCUMENTATION : 
VILLE _ L : Je possède un micro de type 





CODE POSTAL 


Je joins 3 timbres à 2,20 F pour frais d'envoi 








Frais de port : 


Matériel 100 F. Logiciels 15 F 


TOTAL FT Ga ant A E 






RE 1 - ENCHAINE,.BA 


[ditelecr:7.\"1"P unLe 


CARTE BLANCHE à 


NY LUZY 


ENCHAINEMENT À PARTIR DE BASIC 








ENCHAINEMENT DE COMMANDE À 
PARTIR DE BASIC ET DE DBASE Il 








Il peut être intéressant d'enchaîner des com- 
mandes CP/M en quittant Basic ou dBase II, les 
commandes en question pouvant éventuellement 
varier en fonction de certaines conditions ou choix 
en cours de programme. Pour obtenir ce résultat, il 
suffit de créer sur le drive courant un fichier répon- 
dant aux spécifications suivantes : 


- son nom est obligatoirement $$$.SUB, 

- il est composé d'enregistrements de 128 octets, 

- le ler octet de chaque enregistrement doit conte- 
nir la longueur de la commande, 

- les octets suivants constituent le texte de la com- 
mande, éventuellement complété par des blancs, 

- la fin de la commande doit être marquée par un 
caractère nul chr$(0), 

- les commandes seront exécutées dans l'ordre 
inverse du fichier, 

- le fichier $$$.SUB est automatiquement effacé 
dès la fin de l'exécution des commandes, 

- à la différence d'un fichier PROFILE.SUB, le 
texte des commandes ne s'affiche pas à l'écran lors 
de leur exécution. 


REM demo echaine.bas 

L 

OPEN"r",#1,"SSS$S.sub":FIELD #1,1 AS 
lorig$,125 AS command$' (JN) 

REM les commandes doivent etre entrees 
dans l'ordre inverse 

c$="basic monprog":LSET long$=CHRS$ (LEN 
(c$)):LSET command$=c$:PUT #1,1' (FW) 
c$="setkeys standard.key":LSET long$= 
CHRS (LEN(c$S)):LSET command$=cs$:PUT 
#1,2' (UI) 

c$="dir a:[fu,user=all]":LSET long$= 
CHRS (LEN(c$)):LSET command$=cs$ :PUT 
#1,3' (RU) 


CLOSE #1:SYSTEM' (YR) 








SDS GE 




















RSS 


En Basic, pas de difficulté particulière, la 
construction du fichier $$$.SUB se fait au moyen 
des instructions d'écriture sur fichier à accès direct. 
Le programme de démonstration 
ENCHAINE.BAS fait exécuter au sortir de Basic 
la séquence de commandes CP/M suivante : 


dir a:°full,user=all$ 
setkeys standard.key 
basic monprog 








= ES vai 


ENCHAINEMENT À PARTIR DE DBASE 


ne 

















Si dBase a été lancé à partir du drive A:, aucun 
problème : 
QUIT TO «liste de commandes> se charge de 
tout. 


Exemple : 
quit to "pip a:=m:*.ndx","pip a:=m:*.dbf" 


Mais dans le cas où dBase a été lancé à partir 
d'un autre drive (par exemple à partir du drive M: 
pour des raisons de rapidité d'exécution), dBase 
s'obstine à créer le fichier $$$.SUB sur le disque 
A: et la séquence de commandes spécifiée par 
QUIT TO n'est pas exécutée. Il faut donc créer le 
fichier $$$.SUB de toutes pièces. 


Commençons par créer sur le disque A: un 
fichier répondant à la structure suivante : 


CREATE A:VERSCPM <RETURN> 


nom type taille 
LONGUEUR  C 1 
COMMANDE C 60 
ZERO C 1 


FER <S0 > LL: CARTE BLANCHE A TONY LUZY - L'ECHO DU PCW N°22 


[dite ler: 7 LP nel 











= 
1 FIGURE 2 - VERSCPM,.CMD 5 Quand on sait que malgré ce fâcheux incident, 
1 le programme n'est pas effacé de la mémoire, il y a 
* VERSCPM. CMD une solution. Cette solution a pour nom RECUPE- 
| set talk off 1 RE.COM. 
| use a:verscpm | k 
1 copy Stru to Sortie ! Saisissez le programme RECUPERE.BAS 
{use Sortie. | 1 puis tapez RUN. C'est tout. L'utilitaire RECUPE- 
| * un enregistrement sur deux doit etre vide 1 RE.COM est créé. 
À append blank | | 
a NAS SERRES Désormais, lorsqu'apparaîtra le A> de mauvaise 
cpperd Ban augure, ne tapez plus BASIC, mais tapez: 
: replace commande with “pip a:=m:*.ndx" ; RECUPERE M-NOMPROG.BAS 
: append blank _ . ° 
| append blank Û : 
l replace commande with “dir a:{full,user-all]" 1 où NOMPROG est un nom de programme que 
1 + autres commandes precedees par append blank ... | vous êtes sûr de ne jamais avoir utilisé (le suffixe 
{do while (#+1) # B*(int((#+1)/8)) ! BAS est obligatoire). Tapez ensuite : 
| + la creation de $$$.sub n'est correcte que si le L 
1! _* nombre d'enreg. est un multiple de 8 moins 1. É BASIC 
1 append blank É LOAD "M:NOMPROG 
1 replace commande with chr(59) | 
enddo | | !  Etle programme est revenu comme par enchante- 
E replace all longueur with chr(60), zero with chr(0) 1 ment, ce que l'on peut vérifier par LIST. II reste à 
DDR Rens 1 remplacer le disque défectueux ou plein par un 
es {autre et à sauver le programme. 

Répondez "N"' à la question "Voulez-vous com- DOUBLE PRECISION SOUS BASIC 


mencer la saisie ?". puis tapez use pour fermer le 
fichier. Saisissez le fichier VERSCPM.CMD pro- QU LA FETE DES GRANDS MATHEUX 
gramme par : 

MODI(fy) COMMand) VERSCPM 
Enfin tapez: DO VERSCPM. La Basic Mallard dispose de variables flot- 
tantes en simple précision sur 4 octets (avec 6 
décimales) et en double précision sur 8 octets 


RECUPERATION D'UN PROGRAMME (avec 14 décimales). Hélas, un légitime sentiment 
BASIC de frustration s'empara des PCWistes lorsqu'ils 





DR 














constatèrent que les fonctions mathématiques don- 
naient toujours des résultats en simple précision, 
même si leur argument était en double précision. 








rs 





Il vous est sans doute arrivé de perdre un pro- 
gramme Basic en cours de saisie à la suite d'une 


fausse manoeuvre. Une instruction SYSTEM ou RE ES SU SN SR à ei Net co 4 te E 
NEW malencontreuse, avant une sauvegarde par FIGURE 3 - RECUPERE.BA 1 
SAVE, conduit à ce résultat. Mais, c'est le plus | 
souvent à la suite d'une erreur disque qu'apparaît  ! ve RAR AUERERIRNS 
ce genre de problème. Essayez de sauver un pro- 1 | ! 
gramme par SAVE "K:NOMPROG"" et vous Le a a “ 
£ À à È #1, pere.com"' (BL) ! 

m'en direz des nouvelles. Mais la situation la plus |; 40 WHILE l' (F2) | 
imparable est celle d'une erreur physique sur le 150 READ 2S:PRINT #1,CHRS(VAL("&h"+z5)};" (02) 
disque ou d'un disque plein, avec apparition du 1160 MEND' (CL) 1 
message tant redouté : 1170 CLOSE: SYSTEM' (TP) 1 
1 180 DATA ED, 73,00,10,31,00,12,21,80,00,7E,B7,28,06,CD,18:' (TK) | 

A-nnuler, R-ecommencer, I-gnorer ? 3 190 DATA 01,CD,49,01,ED, 7B,00,10,21,91,7A,36,FC,23,36,04:' (90) ! 

1 200 DATA 23,36,00,23,E5,23,23,E5,18,01,19,5E,23,56,2B,7B:' (10) L 

Comme on ne sait généralement pas comment 1 210 DATA B2,20,F7,23,23,36,1A,D1,ED,52,EB,E1,73,23,72,21:' (9C) À 

se sortir de cette situation, neuf fois sur dix, on 1 220 DATA 05,00,19,CB,05,7C,8F,3C,C9,47,C5,11,5C,00,0E,0F:' (92) 4 
retourne sous CP/M avec son fameux A>. Si on | 230 DATA CD,05,00,3C,20,08,11,5C,00,0E,16,CD,05,00,C1,21:" (82) _ 
retape immédiatement BASIC, le précieux pro- 240 DATA 91,7A,C5,EB,D5,0E,1A,CD,05,00,11,5C,00,0E,15,CD:' (AV) 
gramme qui avait demandé trois heures de saisie 250 DATA 05,00,D1,21,80,00,19,C1,10,E8,11,5C,00,0E,10,CD:' (7R) 
nocturne et laborieuse semble avoir définitivement 1 260 DATA 05,00,C2:" (PI) ! 
disparu. 1 ! 
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fcb 
oldstack 
newstack 


fin: 


calcule: 


cal10: 
cal20: 


pm Se em 


Il est néanmoins possible d'évaluer les fonc- 
tions mathématiques grâce aux développements en 
série de Mac Laurin et de Taylor. On démontre 
que : 

sin(x) = x - x3/3! + xS/5! - x7/7! + … 
où x est un angle exprimé en radians et où x! 
représente factorielle de x, c'est-à-dire : 
ASIA TETSSX 
De même : 


cos(x) = 1-x2/2! x4/4! - x6/6! + … 

arc tg(x) = x - x3/3 + xS/5 - x7/7 + … 
exp(x) = 1 + x2/2! + x3/3! + x4/4! + … 
log(x) = 2 * (z + 3/3 + 25/5 + 77/7 + ..) 


où : z=(x+1)/(x-1) 
Les autres fonctions (tangente, arc sinus, arc 


cosinus, log décimal) se déduisent des précédentes. 


Le programme DOUBLEPR.BAS calcule 
toutes les fonctions mathématiques courantes en 
double précision. Cependant, exception faite pour 
la racine carrée (FN DSQR), il est quasiment 
impossible de construire des fonctions "maison" 
par l'intermédiaire de l'instruction DEF FN. Il faut 
donc se résoudre à faire appel à des sous-pro 


FIGURE 4 - RECUPERE.ASM 


s 
l 
l 
! 
org 100h pop hl ; adresse de la longueur L 
1d (hl),e \ 
equ 5ch inc hl | 
equ 1000h ld (hl),d | 
equ 1200h ld hl,5 ! 
add h1, de i 
ld (oldstack),sp rle 1 ; si 1>80h, carry set L 
ld sp,newstack 1d a/h ; nombre de blocs de 256 { 
ld h1, 80h adc a, à ; nombre de blocs de 128 i 
ld a, (hl) inc a | 
or a ns ret ! 
jr z,fin makefile: 
call calcule ld b,a | 
call  makefile push bc | 
ld sp, (oldstack) 1d de, fcb É 
ld (A) u 
call 5 
ld hl,7A91h inc a | | 
ld (h1),0fch ; cree en-tete type basic JT nz,write ; 
inc hl ld de, fcb 
ld (hl),4 ld c, 22 1 
inc hl TA call 5 1 
ld {hl),0 write: E 
inc hl pop bc . 
push hl ; Sauve adresse ou mettre la longueur ld hl,7a91h 1 
inc hl wrt10: push bc | 
inc hl ex d e,hl | 
push hl ; sauve adresse debut de programme push de | 
jr cal20 1d c,lah l' 
add h1, de call 5 | 
ld e,(hl) ;longueur de la Ligne -> de 1d de, fcb Les pro- E 
inc hl ns “ 15h grammes 
de. UN Fe et fichiers 
se es de cet 
ld ae  ; si nulle, fin de programme ld hl,80h Î 
or d add  hl,de article se | 
jr nz, cal10 ; si non nulle, continue pop bc trouvent 1 
inc  hl re sur la 
inc hl e,fcb 1 
ld (hl),1ah ld c,10h disquette | 
pop de ; adresse debut cs 5 ECHO N°22 E 
re 
l 
J 


grammes appelés par GOSUB. L'argument est 
passé dans la variable x et le résultat est retourné 
dans la variable dsin, dcos, dtan, datn, etc, selon la 
fonction. 
Notez qu'il est interdit de faire : 

a = 0.1 : x = a : gosub 60000 
car a étant une variable en simple précision, x 
étant en double précision en raison de l'instruction 
DEFDBL x-7 en tête de programme, lors de la 
conversion, x prend une valeur inexacte. Reportez- 
vous à la page 56 du manuel du Basic pour en 
savoir plus. 


L'emploi de variables utilisées dans les sous- 
programmes est à éviter, notamment : XX, yy, x2, 
Z1, 22, Zex, pow, ic et ix. 


Si le calcul des fonctions ne brille pas par sa 
rapidité, l'exactitude des résultats est tout à fait 
honorable, comme l'ont révélé des comparaisons 
avec ceux obtenus sur un gros ordinateur en qua- 
druple précision. Les deux dernières décimales 
sont cependant douteuses pour les exponentielles 
de nombres élevés et les tangentes d'angles 
proches de x ou de -7 radians. 5 


sbc hl,de ; moins adresse fin = longueur prog 
ex de,hl ; -> de 
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GRAMMATION 








10+DEFINTei-m:DEFDBLed,p,x-z'° (AC) 

20*RESTORE 61000 :READ*deuxpi,pi,pi.2,pi.4,pi.6,pi.12,dlog.10 
,d1og. 4, dsq3, ddeg, drad' + (V9) 

30°RESTORE *61040:DIMezf(34) :FOR°1=0+T0+34:READ+zf(1) :NEXT'° ( 
JC) 

40DEF+FNdq(x, y)=(y+x/y)/2"°(5P) 

50 DEF *FNdmod(x}=x-deuxpi* INT (x/deuxpi ) ‘+ (YA) 

60+DEF+FNdsqr (x)=FNdq(x, FNdq(x, FNdq{x, SOR(x) } } } " * (QU) 

10+:'+ (4H) 
80+'+ddege=efacteur‘deconversion*radians*->+degres 
90*'+drade=-facteurde*conversion-degres*->eradians 
100+:"+{5N) 

RTIOLLELLELLELELEEELELEEELELESEEES, 

PA DE DEOCEEEEE EEE ELLE ECUEEEL 
130'teseCe[eseeVeOeTeReEeest 
140+!#eesPeReOeGeReAsMeMeE ook e 
150+"*eepeEeReS+OeNeNeEeLeesx 

TOOL EELEEEEEEEELES 
170+!kesesgexepemepeleee:eseek 

JE TIO CCC EEE EEE EEE 

190! 

200PRINT" racine (15) *=",FNdsqr (15) '+(IY) 
210+x=0.35#:GOSUB*60000:PRINT"sin(0.35+radian) +=", dsin' + (DV) 
220+x=45tdrad:GOSUB*60000:PRINT"sin(45 degrés) *=",dsin' + (H3) 
230°x=60*drad:GOSUB*60000:PRINT"sin (60 degrés) +=", dsin' * (GY) 
240+PRINT"racine (3) +/+°2°=",FNdsqr (3) /2' + (LM) 
250°x=1.85#:GOSUB* 60100 :PRINT"cos(1.85+radian) +=", dcos' + (E2) 
260°x=60*drad:GOSUB*60100 : PRINT"cos (60 ‘degrés) =", dcos' + (GS) 
270°x=0.95#:GOSUB* 60200 :PRINT"tan(0.95+radian) +=", dtan' + (El) 
280+x=0.95#:GOSUB*60500:PRINT"arcesin(.95) +=", dasn; "radian", 
dasntddeg; "degrés"" + (KH) 
290°x=0.45#:GOSUB*60400:PRINT"arcecos{.45) +=", dacs;"radian", 
dacstddeg; "degrés" "+ (JG) 
300°x=0.78#:GOSUB*60300:PRINT"arcetan(.78)*=",datn;"radian", 
datn*ddeg; "degrés""+(K5) 
‘310+x=1:GOSUB*60300:PRINT"arcetan(1} +=", datn;"radian",datn*d 
deg; "degrés"! + (BV) 
320°x=8:GOSUB* 60600: PRINT"exp(8) =", dexp'e (TF) 
330+x=12:GOSUB°60700:PRINT"1og* + (12) =", dlog' + (V9) 
340+x=63:GOSUB*60800:PRINT"10g10 (63) =", dlog10'*(11) 
350°x=10:y=2.54:GOSUB*60900:PRINT"10"2.5+=", dpui' + (4P) 

360°" 

EL CEE EEE EEE OOEOEEEEEEEEEE ES 

LI DOLELELELEEEELESEELESEEEES ES 

390+:"+{5Y) 

400°:"+(50) 

59990+END' + (DJ} 


60000e"ektkkttttesinuse*t*tttéttékt 

60010xx=FNdmod (x) : IF°xx=0*ORexx=pi *THENedsin=0 : RETURN! + (LY) 
60020°1F°xx>p1 THEN °xx=xx-pi :GOSUB*60030 :dsin=-dsin:RETURN' + 
(UL) 

60030°1F-xx=pi.2®THEN°dsin=1 :RETURN' + (N7) 
60040°1Fexx>pi.2®THEN°xx=p1-xx :GOSUB ° 60050 : RETURN" » (C1} 
60050°1F-xx>p1.4*THEN°xx=p1.2-xx :GOSUB*60180 :dsin=z1 :RETURN' 
* (UG) 

60060°G0SUB*60170:dsin=z1:RETURN' + (JB) 
60100e"ekkkkktttecosinuse**ttttété 

60110-xx=FNdmod (x) : IF°xx=0+0R°xx=pi ° THEN *dcos=1 : RETURN" + (LV) 
60120°1F+xx>pi THEN °xx=xx-p1 : GOSUB*60130 :dcos=-dcos : RETURN! + 
(UD) 

60130+1F+xx=p1.2°THEN-dcos=0 :RETURN' + (N2) 
60140°1F+xx>p1.2°THEN°xx=pi-xx:GOSUB*60150:dcos=-dcos:RETURN 
's(xs) 
60150°1F-xx>p1.4eTHEN°xx=pi. 2-xx :GOSUB*60170 : dcos=z1 : RETURN! 
*(UB) 

60160GOSUB°60180 :dcos=z1 :RETURN' + (J5) 
60170x2=xx*xx:z1=xx:pow=-xx*x2 : 1c=3:GOTO*60190 + (AW) 
60180°x2=xxtxx: z1=1 :pow=-x2: 1c=2" + (JW) 
60190°22=0:WHILE°z1©22:22=21:21=21+2f (ic) *pow:pow=-pow#x2:i 
c=ict2:HEND:RETURN' + (HY) 

60200+'+*tkkttketangentee*kkkkktx 
60210+GOSUB*60010:GOSUB*60110:IF *dcos<>0 *THENedtan=dsin/dcos 
:RETURN "+ (5D) 
60220+1F-dsin>0+THEN‘dtan=1)+37:RETURN°ELSE *dtan=-1D+37: RETU 
RN' + (WQ) 

60300c"ettttttegrcetqett*ititt ti 

60310+xx=x" °(FZ) 

60320°1F+xx=0°THEN° datn=0 : RETURN" + (HG) 
60330°1F°xx<0+THEN°xx=-xx:GOSUB* 60340 : datn=-datn : RETURN" + (N7 
) 
60340°1F°xx>1®THEN°xx=1/xx:GOSUB*+60350:datn=pi.2-datn:RETURN 
"+ (VO) 
60350°1Fexx>0.268THEN°xx= (dsq3*xx-1) / (xxtdsq3) : GOSUB*60 360: 
datn=pi.6+datn:RETURN' + (U7) 

60360°x2=xx*txx:z1=xx:z2=0 :pow=-x2*xx:zex=3! + (50) 
60370WHILE*z1Cz2:z2=21:z1=21+pow/zex:pow=-pont x2 :zex=1ex+2 
:HEND:datn=21 :RETURN' + (65) 
60400'orkttttttearcecose**tkrkktt 
60410°IF+ABS (x) >1®THEN*ERROR +5" + (91) 
60420+1F°x=1°THEN*dacs=0 : RETURN" * (EQ) 
60430+1F°x=-1°THEN°dacs=pi : RETURN! * (1X) 

60440+xx=FNdsqr ((1-x) /(1+x)) :GOSUB+60320 : dacs=2*datn :RETURN' 
* (SP) 

60500!v#kttttttearcesinettititk 
60510+1F+ABS (x) >1°THEN°ERROR +5" + (9J) 
60520+1F+x=0THEN+dasn=0 : RETURN" * (F1) 
60530°1F°x=1°THEN*dasn=p1.2: RETURN! * (KO) 
60540°1F°x=-1eTHEN°dasn=-p}.2:RETURN' + (N7 
60550+xx=x/FNdsqr (1-x*x) :GOSUB*60320 :dasn=datn:RETURN' + (N2) 
60600e'"e*xtttkkepxp{x) °*XRKKKER 

60610+xx=x: IF °xx=0 °THEN* dexp=1 : RETURN! * (SG) 
60620+1F+xx<-87°THEN°dexp=0 : RETURN" + (KS) 
60630°1F°xx>87°THEN°ERROR°6! + (5M) 
60640°1Fexx<0+THEN°xx=-xx: GOSUB* 60650 : dexp=1 /dexp: RETURN" + (P 
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60650°1x=0:WHILE+xx>1.4:xx=xx/2:1x=1xtl :WEND' , (60) TIGRE DANS VOTRE DBASE Il in ECHO 20 
60660pon=xx:z1=1:z2=0:ic=l' (A7) 


60670WHILE°z1C>22:z2=z1:z1=z1tpoutzf (ic) :pow=pontxx:1c=1c+1 











:HEND: dexp=z1" + (02) Oubliés par la grâce d'un hasard extraordinaire, 
60680-WHILE*1x:dexp-dexptdexp:1x=ix-1:WEND:RETURN' * (JV) la commande COMPACTE.CMD et son désas- 

RO TO PER RENE LOL TA AAAAE semblage COMPACTE.ASM, ont simplement 
60710+IF+x<=0+THEN*ERROR 5! (30) disparus de l'article. Sachant qu'il vaut mieux tard 
60720+1F+x=1°THEN*d10g=0 :RETURN' + (F4) que jamais, je vous les communique, ci-après, en 
60730exx=x: IF +xx<1°THEN°xx=1 /xx: GOSUB*60 740 : dlog=-dlog:RETUR espérant qu'ils ne vous auront pas trop manqués... 

N' + (26) ARRETE TE RIRES EEE FERRER 
60740°1x=0:MHILE°xx>2.85:ix=ixt]l :xx=xx/4:WEND' + (70) L COMPACTE . CMD | 


60750°z1={xx-1)/(xxt1) :x2=21#z1:pow=x2*z1:z2=0:1c=3" * (DN) 
60760WHILE+z1C222:z2=21:z1=21+pow/ic:pow=poutx2:1c=1c+2 :WEN 
D:dlog=2#21! + (JN) 

60770WHILE ‘1x: dlog=dlog+dlog.4:1ix=1x-1:NEND:RETURN' + (LP) 


poke 42330,124,230,128,192,229,33,252,166,6,255, 54,32,35,16,251,225 
poke 42346,229,205,20,165,225,58,159,165,79,70,35,17,252,166,213,229 
poke 42362,197,126,185,40,18,254,58,48,6,254,48,56,12,24,8,254 

poke 42378,91,48,6,254,65,56,2,18,19,35,16,229,193,209,225,72 | 











60BDD»"#AAKAKXeLoglD (x) *AAAAAAKA poke 42394,6,0,237,176,201, 32 
60810+G0SuB-60710:d1og10-dlog/dlog. 10:RETURN' + (3J) RS ee 
60900v"etttttatexeeyertaattt org 0A55Ah | 


buffer equ OA6FCh COMPACTE . ASM 


60910+1F+x=0°THEN°dpui=0 : RETURN! + (FG) 
majusc equ 0AS14h 


60920 °yy=y: IF *yy=0°THEN* dpui=1 : RETURN" + (SQ) 


























60930°1F-yy<0°THEN°yy=-yy : GOSUB 60940 : dpui=1 /dpui :RETURN' + (P COMPACT: ld ah | 
Q and 80h ; Si pas de parametre, 
60940°1F yy=INT (yy) *THEN°dpui=] *ELSE *GOSUB*60730 :xx=dlogt (yy | ret  nz ; alors, retour. ; | 
; «60620: doui= ” push hl ; Sauve adresse de la chaine. 
-INT(yy)) :GOSUB ; pui=dexp (CU) Î ld hl, buffer | 
60950°1F °yy>=1+THEN*FOR° ic=1 °TO+ INT (yy) : dpui=dpui*x:NEXT'°(N ld b,255 | 
C) com05: ld {hl),'" ; Met a blanc le buffer. 
60960-RETURN'" + (KL) men “2 | 
djnz  com0s 
61000DATA+6.28318530717958647692, 3.14159265358979323846, 1.5 | pop hl ; Recupere adresse de la chaine. 
1079632679489661923: "+ (7H) push  hl 
61010-DaTA°.785398163397448309616, .523598775598298873077, .26 | call te ; Met la chaine en majuscules. 
dk pop 
117993877991 49436539: ' + (8H) | \d à ae) | 
61020DATA°2. 30258509299404568402, 1. 38629436111989061883, 1.7 | ld c,a 
3205080756887729353:'°(6F) 1d b, (hl} : b = longueur de la chaine. | 
61030+DATA+57.295779513082320877, 1. 14532925199432957692d-2:° me ; h1 pointe sur debut de la chaine 
ld de,buffer 
*{CY) push de 
61040-DATA°1,1,.5,1.666666666666666667d-1,4.1666666666666666 | push  hl 
61d-2,8.333333333333333333d-3:! ° (LI) hu . bc | He 7 
61050+DATA 1. 388888888888888889d-3, 1 .984126984126984126d-4, 2 Sade RER SU NS 
.480158730158730159d-5: " + (D2) | jr z,comj0 ; Si oui, accepte le caractere. 
61060DATA°2.755731922398589065d-6, 2. 755731922398589065d-7, 2 | cp 19141 : Si > ‘9', alors n'est pas un 
50521083854417187d-8: !» (AO) jr nc, com20 ; chiffre, est-ce une lettre ? 
: ’ cp "0" ; Si < "0", alors n'est pas un 
61070-DATA°2.087675698786809898d-9, 1 .605904383682161459d-10, dc + CHtre aire 1e GEICIeRE 
1.147074559772972471d-11 : ! + (FA) Jr con30 
61080DATA°7.647163731819816475d-13, 4.779477332387385297d-14 | CPAS CP "41 ; î . 2 a es Fe une 
ects Jr nc, COM: ; Jettre, saute le caractere. 
,2.811457254345520763d-15:" + (GB) | cp me SO CA alrrnest pete 
61090-DATA+1.561920696858622646d-16, 8.220635246624329717d-18 jr c,com40 ; dettre, saute le caractere. 
14.110317623312164858d-19:" + (FK) com30: 1d (de),a ; Copie dans le buffer 
61100+DATA°1.957294106339126123d-20, 8.896791 392450573286d-22 Li cs à 
13.8681701706306840 38d-23:° + (FF) djnz  coml0 ; .… jusqu'a fin de la chaine. 
61110-DATA+1.611731571096118349d-24, 6.446950284384473396d-26 pop be 
,2.419596263224797460d-27: ‘ » (G6) | pop de 
61120+DATA+9.183689863795546148d-29, 3.219889237069837910d-30 | a Le 
,1.130996288644771693d-31 : "+ (H2) | ld  b0 


61130-DATA°3.769987628815905644d-33,1.216125041553517950d-34 
13.800390754854743593d-36: ! + (FV) 
61140-DATA°1.151633562077195028d-37, : ! + (GD) 
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1 ère MONDIALE ! 
CONCOURS 





D 


Concours ouvert du 15 Juillet 88 au 31 Septembre 88: minuit (cachet de la poste faisant 
foi. Le concours EDITO est ouvert à tous, sans o Ë 
nel de LOGISTICK et de leur famille. 












Le jury, constitué 
sera souverain. 


La remise 
EXPO 88 (entre [654 


mplet est déposé chez M° Leclerc Huissier d nc-Mesnil 
N Le Bonaparte”, et chacun peut l'obtenir par simple demande écrite, accompa- 
gnée de 3 timbres à 2.20 F pour participation aux frais d'expédition. 






Les EDITO sont à envoyer avec le coupons, ci-joint, à l'adresse suivante : 
LOGJ'STICK Edition 
"CONCOURS EDITO" 
CAPN - LE BONAPARTE - BOIÏTE 49 
93153 LE BLANC-MESNIL CEDEX 


0000000 000000000000000 000000000000 000000 000 000000 000 00000000 000000000000000000000000000000000 000000000000 008 000000008000 000 00000000 008 000 000000 000 202 800 800 000 800 800 000 008 800 800 000 808 000 880 000 800 080 000 008 000 000 008 000 000 200008 F0 00000 00 000000000000 800000 


Je désire participer au “concours EDITO", voici mes coordonnées : 


NOMME ue A CU en ne PRÉNOM rende ee ne AE 
AD ESS den ne de De At A ones ul ed nes 
CODE he re MD nee Done ee A on A eo Rd AE 
PAS en nn Re TÉLÉPHONE en manon te 


et j'en accepte le règlement : Signature (ou ccte des tuteurs pour les participants mineurs) 


LE SECRET DÜ BONHEUR 


NN EOGART EE HU MPHRE Y 
SE 3 1/02/1989 PEU 6 74894 


PVECLEU 


Cette cañe strc'ement personnelle SIGNATURE XXX 


donne droit a loules les activites du CIUD 


LE CB ECHO 
DO" Ù 
P.c.wWk 





©. P 
R— Le CLUB, c'est l'assurance d’être plus PCWiste que jamais ! 


N'attendez pas pour vous inscrire et pour recevoir votre carte 
personnelle qui est déjà le symbole de ralliement des PCWistes 


avertis. 













Validité 





Signature obligatoire : 


Q OU E T T E S 
Les disquettes thématiques de l’Echo reprennent tous les 


programmes depuis le numéro 1. Bénéficiant des dernières 
améliorations chaque disquette est livrée avec son manuel. 












& GESCALC GESTION DE POKER FOLIES 
Er rt © INVESTISSEMENT = x" © STOCK REP RUE AGENDA 
PATRIMOINE ATHEMYS MUSIC MACHINE 
BUSINESS SUPER GRAPHE MATHELEM 
PERT EVALUATION LOTO 
DEMO : AZERTY TAO. OTHELLO 


DEMO : TASWORD DEMO : AZERTY 





Æ nous À ETIQUETTES DBASE pack AUTO. = a, À GSX.BAS 
MULTIPLAN MULTIPLA.KEY UNLTAIRE 1 PROGRAMMATION E «rc Fi] GSXDAO 
AE POM STANDARD KEY GAG ET SETKEYS T.A.O. 
DBASE.KEY PRINTER MAKER LES PLUS D'EXBASIC 
PROGI.CMD, PROG.CMD MONITEUR DE DISC SUPER GRAPHE 
MENU.CMD MATRIX DEMO : GRAPHIC MAGIC 
DEMO : AZERTY LOCASC2 





TABLEAUX ASCII 
DEMO : GRAPHIC MAGIC 


000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 


es TAQUIN COMMANDES ET FICHIERS LOGOGRAF 
PACK JEU 2 BIORYTHMES PACK DBASE 1 DU SYSTEME EXPERT LOGOTRAM 
SNAKY COMMANDE ET FICHIERS ETIC FACILE 
PARACHUTE A LA RECHERCHE DE CODES GRAPHIQUES POUR 
JEU DE LA VIE L'OCTET PERDU DBASEII 
SUPER QUIZZ CODES GRAPHIQUES POUR TRIFICH 
DEMO : AZERTY DBASEII CALEND.PC 





DEMO : TASWORD 


TURBO.KEYS CHRONOS3 GENERATEUR D'INDEX 
MENUS DEROULANT INVEST3 TRANS LOCASC2 
ECHO.BAS BUDGET FAMILIAL TOUS LES FICHIERS DEPUIS 
CLAVIER MAKER GESCALC2 LE N°1 

TROUVE.BAS CALEND.PC 


VERIF BI12+ 
DEMO : GRAPHIC BASIC 


DEMO : GRAPHIC MAGIC 





NOUVEAU) 


cecececeecececccececeecececeoceceece 


0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 





Bon de commande au dos 
ARRETER LE TAPAGE NOCTURNE 


Reposez-vous, offrez à votre PCW les disquettes de l’Echo du PCW. Saisis 
avec amour et testés avec passion, les programmes qui les composent sont 
ceux du numéro correspondant... Alors contre l'usure prématurée du cla- 
vier.. une seule solution : Commandez-les ! 


ATTENTION DESORDRE... 


Le numéro d'Avril est introuvable ? Celui de Juin froissé ? Comment pouvez- 
vous supportez cela ? Vous ne pouvez plus, alors d’Echo vous le dit... C'est 
la reliure qu'il vous faut ! Prévue pour classer une année complète soit onze 
numéros, elle garantit la longévité de votre collection et vous fera gagner 
un précieux temps en recherche et en classement... 


LE CHAINON MANQUANT... 


L'Echo du PCW est le mensuel des PCWistes et depuis son premier numéro 

de nombreux sujets essentiels ont été abordés. L'information qui vous man- 

que est probablement dans l’un d’entre eux. Alors ne cherchez.plus vaine- 

ment et complétez, sans attendre votre collection avec les sommaires des 
_ anciens numéros. 


LU 
ë 
8 
£ 
ÿ 





7 PLUIE LLII! 


Notez chacun des articles que vous avez lus et retournez ce questionnaire à L'ECHO. 
Chaque mois, l'auteur dont l'article a obtenu la meilleure moyenne se verra attribuer une 
prime de 1000 F et le lecteur tiré au sort recevra un magnifique cadeau-surprise. 





PAGE PAS LU NUL MAUVAIS MOYEN BON EXCELLENT NOTES 

6 Q Q Q Q Q EM 0 120 

8 Q Q Q CG Q Eh. fai 120 

13 Q Q Q Q Q CS 120 

16 Q Q Q Q Q CS 120 

20 Q Q Q QG Q CE x 120 

36 Q Q Q Q Q Où... >: 120 

42 Q Q Q Q Q ED: 120 

46 Q Q Q Q Q Q 120 

Ë Q Q Q Q Q — > 120 
Noms Mein otetar taraseists Prénoms vers AQG: ie Profession: issus iris 
DR cu Ad Guns US NT ; 


BON DE COMMANDE GENERAL - au 01/09/88 - (annule et remplace les précédents) 


Melle/Mme/M./Sté/Ass° - Nom : nn Prénoms nee tahe nn ART Aer 
ACTOSSO nn RE NC Rene ET CRT ES ne SC NN Rd finir ian 


PTE RAA RTE CR CQUOAT SEOMÆEREIER | REFERENCE QTE PRIX UNITAIR 


(Encerclez les numéros choisis et reportez la quantité totale dans la colonne de droite) 


1 
1 
1 1234567 8 9 10 11 12 13 14 15 16 17 18 19 20 2122 > DE . x 





(Encerclez les références choisies et reportez la quantité totale dans la colonne de droite) 


i 
PGEI PGE2 PGE3 PLOI PDBI PTUI PTU2 PGRI PGR2 PJEL PJE2 POMI 


RELIURES DE CLASSEMENT PERSONNALISEES "ECHO DU PCW" 
| Reliure (11 numéros) - Prix unitaire 80 F (dont TVA 18,6% = 12,55) 


RUBANS NOIRS ET COULEURS - TISSUS - SANS FIN - LONGUE DUREE 


1 
{Rubans couleurs (ADD 22) : … x rouge … x bleu … x vert … x orange … x violet … x marron 
À (Prix unitaire 150 F dont TVA 18,6% = 23,52 - Reportez la quantité totale dans la colonne de droite) »> ADD22 . 








DISQUETTES EXCLUSIFS - Prix unitaire 150 F (dont TVA 18,6% = 23,52) 






(Encerclez les références choisies et reportez la quantité totale dans la colonne de droite) 


( 
! 
l XO01 X002 XO03 XO04 X005 XO06 X007 X008  X009 > DX . x 150 
(l 
l 


X010 XO11 XO12 X013 XO14 XO15 XO16 XO017  X018 
FRAIS DE PORT : FRANCE 20 F | Obtigusires pur es 
produits ci-dessus, ils 
ETRANGER / DOM -TOM : 40 F | im 'enbales 


ECHO DU PCW - ANCIENS NUMEROS ET ABONNEMENTS (FRANCO DE PORT) 
ANCIENS N° : Prix unitaire France 30 F (dont TVA 7% = 1,96) - Etranger 40 F (dont TVA 7% = 2,62) 

















1 

1 

| (Encerclez les numéros choisis et reportez la quatité totale dans la colonne de droite) > ECHO . x 30/40° L 

L 1234567 8 9 10 11 12 13 14 15 16 17 18 19 20 21 1 
l 

' Abonnement JOURNAL ECHO DU PCW - un an soit : 11 numéros > ABE . x 290/450° = 

France : 290 F (TVA 7% = 18,97) - Etranger / Dom Tom : 450 F (TVA 7% = 29,44) td TO — 
E Abonnement DISQUETTES ECHO DU PCVW - un an soit : 1} numéros > ABD . x 690/900° 

! 

l 


France : 690 F (TVA 18,6%=108,21) - Etranger / Dom Tom : 900F (TVA 18,6%=141,15) dt sl —— 

IRON NIV ER »>-»>»-»>->»->->»->->->->>>> 
REGLEMENT A L'ORDRE DE LOGI!'STICK PAR : ° Rayez la mention inutile 
{_ MANDAT ÎJ CHEQUE __ [J_ CCP LL 


pe cmomsaccmssscresros cesse 


iQ VISA/CARTE BLEUE 





In Curitrritiritinn) Vaidté: / | 


mm EEE Es 


« ATTENTION ! CE BON DE COMMANDE TIENT LIEU DE FACTURE. CONSERVEZ-EN UN DOUBLE POUR VOTRE COMPTABILITE . 
A RETOURNER A LOGlSTICK Edition 








CAPN - Le Bonaparte - Boîte 49 - 93153 LE BLANC-MESNIL Cédex - FRANCE 







L'ECHO DU PCW L'ECHO DU PCW L'ECHO DU PCW 
juillet-août 1986 | septembre 1986 | octobre 1986 

















SPECIAL LIGHT PEN SPECIAL IMPRIMANTE SPECIAL ECRAN 
COMMENT CHOISIR SA COMPTA (1) FAITES FORTUNE AVEC VOTRE PCW BASIC : COMPATIBILITE CPC/PCW 

LES CONFIDENCES DE LOCOSCRIPT LES PLUS DE MULTIPLAN INITIATION A DBASE Hi {1} 

BASIC : GSX - UN DEPART BIEN DEMARRER EN LANGAGE COMMENT CHOISIR SA COMPTABILITE (Hi) 
SAISISSANT MACHINE LES CONFIDENCES DE LOCOSCRIPT 
PROGRAMME : POKER FOLIES TOUT SUR LA SAUVEGARDE INITIATION LANGAGE MACHINE {11} 
REPORTAGE : AMSTRAD SHOW BASIC ET AUTO-PROGRAMMATION DOSSIER : L'ECRAN 

ESSAIS : LIGHT PEN - 3D CLOCK LOCOSCRIPT, NEW LOOK, etc … PROGRAMME : INVESTISSEMENT - AGENDA 
CHESS LES LIVRES DE VOTRE PCW ESSAS : LA SOURIS - TOMAHAWXK - 
BIORYTHMES - LIVRE JETSAM - ROTATE - EXBASIC LIVRES DE 
AZERTY MULTIPLAN 


Tous les programmes du N° À Tous les programmes du N° 2 
ont sur la disquette 1. Lo} ont sur la disquette 2. (o] 


une démonstration gratuite + 
d'AZERTY 4 


L'ECHO DU PCW/ L'ECHO DU PCW L'ECHO DU PCW 
février 1987 avril 1987 mai 1987 































Tous les programmes du N° 
ont sur la disquette 3. 















L'ECHO DU PCW 
nov - dec 1986 


SPECIAL DBASE 

INITIATION À DBASE 11 (2) 

LES LIVRES ET LES TRUCS DE DBASE 
DES CADEAUX POUR PCW 
TRANSFORMER UN PCW EN 
SERVEUR MINITEL 

LES CONFIDENCES DE LOCOSCAIPT 
PROGRAMME : MATRIX - PATRIMOINE 
ESSAIS : TASWORD 8000 - MEDIACOMPTA - 
MX 330 - CLEF POUR PCW 


< 


ont sur la disquette 4. 





L'ECHO DU PCW 
juin 1987 





Tous les programmes du N° 4 À 
Lo 
















SPECIAL SOMMAIRE 
ESSAI : MEMENTO BILAN PLUS 
INITIATION À DBASE II (6) 
CP/M : TOUS LES LIVRES 


SPECIAL PLUS 
ESSAIS : SPOOL 

INITIATION À DBASE Il (4) - LES PLUS 
CPM : LES PLUS - DELUGE ASCII (1) 


SPECIAL COMPTA 
ESSAI : MAILING 

INITIATION À DBASE 1! (5) - LES LIVRES 
COMMENT CHOISIR SA COMPTABILITE (4) 



































+ EXBASIC L'EVATION TELEMATIQUE ANCIENS SOMMAIRES THEMATIQUES 
LES CONFIDENCES DE LOCOSCRIPT DELUGE ASCII (2) L'EVASION TELEMATIQUE 

REPORTAGE : AMSTRAD SHOW LES CONFIDENCES DE LOCOSCRIPT LES CONFIDENCES DE LOCOSCRIPT 
L'EVASION TELEMATIQUE LES BONS PLANS DE MULTIPLAN DELUGE ASCII (3) : MULTIPLAN 
PROGRAMMES : GESTION DE STOCK PROGRAMMES : PRINTER MAKER 3 - PROGRAMMES : GESCALC 

-DAO ET GSX UNE COMPTA SUR PCW 






Tous les programmes du N° 6 
sont sur la disquette 6. 

+ Une démonstration gratuite 
de TASWORD 8000. 


L'ECHO DU PCW 
septembre 1987 





ont sur la disquette 7. ont sur la disquette 8. 






L'ECHO DU PCW 
octobre 1987 


L'ECHO DU PCW 
novembre 1987 


























SPECIAL TELECOMMUNICATION 
INITIATION A DBASE II (8) 
COMMUNICATION : L'UNIVERS 
TELEMATIQUE - LES LIVRES - RS 232 
L'EVASION TELEMATIQUE 

DIVERS : DECOUPE BANDES - PCW VECU 
CPM : TOUT SUR LE CLAVIER 
PROGRAMMES : PERT - RS/MAKER - 
OTHELLO 

ESSAIS : MODEM OLITEC + CALVACOM - 
MAIL 232 


SPECIAL PROGRAMMES 
ESSAI : TURBO EXPERT BASE 
INTIATION À DBASE 11 (9) 

L'EVASION TELEMATIQUE 

DEMARRER EN CP/M 

LOCOSCRIPT : LE SECRET DES PAGES 
INITIATION A L'INTELLIGENCE 
ARTIFICIELLE 

PROGRAMMES : MONITEUR DE 

DISC + LOCOGRAF - LOTO - 
STICKER_MAKER - TA O. 


Tous les programmes du N° 11 
sont sur la disquette 11. Co] 








SPECIAL PA.O. 
ESSAI : DTP-PAO - VIDI MX:-990 - ASTRO 
INITIATION A CP/M (2) 

INITIATION A DBASE 11 (10) 

INITIATION AU BASIC (1) 
INTRODUCTION À LA PAO 
PROGRAMMES : INVEST + - 
VERIFICATEUR B-12 - QUIZZ - 
LOCOTRAM 





























Tous les programmes du N° 1 


sont sur la disquette 12. sont sur la disquette 13. 









L'ECHO DU PCW 
mars 1988 





L'ECHO DU PCW 
avril 1988 


L'ECHO DU PCW 
février 1988 





Tous les programmes du N° 7 ous les programmes du N° 8 


Tous les programmes du N° 1 Ÿ À 
(°) 


SPECIAL JEUX 

INITIATION A DBASE Il (7) 

LES AVEUX DE MME LACAILLE (1) 
UVRE : FICHIER SUR AMSTRAD 
DELUGE ASCII (4) : RPED 

LES CONFIDENCES DE LOCOSCRIPT 
L'EVASION TELEMATIQUE 
PROGRAMMES : MATHELEM 

ESSAI : GRAPHIC MAGE - JOYSTICK 


Co ont sur la disquette 9. 
: de GRAPHIC MAGIC 


L'ECHO DU PCW 
décembre 1987 










SPECIAL TUYAUX 
ESSAI : SCANNER, SIGNWRITER 
L'EVASION TELEMATIQUE 
REPORTAGE : E. MEZO 
DBASE : INITIATION LA. (3) 
PROGRAMME : LOCOSCRIPT, 
BUDGET FAMILIAL 

CARTE BLANCHE A V. LEDOS 
INITIATION AU BASIC (3) 

CPM : TOUT SUR LE CLAVIER 






sont sur la disquette 14. 








L'ECHO DU PCW 
mai 1988 



































SPECIAL COURRIER 
PROGRAMMES : TAQUN - LOCO INDEX 
INITIATION À CP/M (6) 


SPECIAL PROGRAMMES 
BASIC : UTILITAIRES - CLAVIER MAKER 
-TROUVE.BAS 










SPECIAL ASTUCES 
LA LOGITHEQUE DU 9512 
JEUX : HISTOIRE D'OR 














JEUX : SNAKY - PARACHUTE INITIATION AU PASCAL (1) INITIATION AU BASIC (5) 

DBASE Il : À LA RECHERCHE INITIATION A CP/M (4) INITIATION AU PASCAL (2) 

NITIATION A CPM (3) LES ENTRAILLES DU PCW LES CONFIDENCES DE LOCOSCRIPT 
CARTE BLANCHE A O.COQUN ASCII ET DBASE BANC D'ESSAI : MOP-MEP { TRATE- 
L'EVASION TELEMAT QUE CARTE BLANCHE A R. SCHYNS MENT DE TEXTE ET BASE DE DONNEES) 


LE PCW LOOK PC 


Tous les programmes du N° LS 
© 


L'EVASION TELEMATIQUE 







Tous les programmes du N° 16 
sont sur la disquette 16. Lo sont sur la disquette 18. 





Tous les programmes du N° 1 w À 
(o} 












SPECIAL FORMATION 
REPORTAGE : SCOOP EN STOCK - 
LOCO DE MES REVES 

LES CONFIDENCES DE LOCOSCRIPT 
INITIATION AU PASCAL (4) 

DOSSIER : MONTEE EN ALTITUDE - 
GENEALOGIE AVEC LOCOSCRIPT 
BANC D'ESSAI : MOP-MBP (SUITE) 
PROGRAMMES : DBASE ET ASSEM- 
BLEUR - À PROPOS D'ATHEMYS - 
MUSIC MAESTRO 





ont sur la disquette 19. 









Tous les programmes du N° 9 À 
s (o] 


LS + Une démonstration gratuite 


Tous les programmes du N° 14 


Tous les programmes du N° 1 


L'ECHO DU PCW 
janvier 1987 




























SPECIAL MUSIQUE 
INITIATION À DBASE 11 (3) 
CPIM : SETLST 
TELEMATIQUE : L'EMULATION MINITEL 
LES CONFIDENCES DE LOCOSCRIPT 
PROGRAMME : MUSIC MACHINE 
BUSINESS 

ESSAIS : COMPAGNON - MX 550 - 
STRIKE FORCE - HARRIER - PCW10 
DISQUE DUR 


sont sur la disquette 5. 


L'ECHO DU PCW 
juil - août 1987 


SPECIAL TELECOMMUNICATION 
INITIATION À DBASE 1! (8) 
COMMUNICATION : L'UNIVERS 
TELEMATIQUE - LES LIVRES - RS 232 
L'EVASION TELEMATIQUE 

DIVERS : DECOUPE BANDES - PCW VECU 
CP/M : TOUT SUR LE CLAVIER 
PROGRAMMES : PERT - RS/MAKER - 
OTHELLO 

ESSAIS : MODEM OLITEC - CALVACOM - 
MAIL 232 





ont sur la disquette 10. 


L'ECHO DU PCW 
janvier 1988 


SPECIAL BANC D'ESSAI 
BANC D'ESSAI : PCW 9512, 
HERAKLIOS, ASTRO FUTUR 
DBASE 1! : À LA RECHERCHE 
TOUT SUR LES RUBANS 
INITIATION AU BASIC (4) 
PROGRAMMES : CHRONOS 
LES VOEUX DE L'ECHO 







ont sur la disquette 15. 


L'ECHO DU PCW 
juin 1988 





SPECIAL DBASE 
NOUVEAU II: LES EXCLUSIFS DE 
L'ECHO - FICHES TECHNIQUES 
INITIATION AU BASIC (6) 

INITIATION AU PASCAL (5) 
PROGRAMMES : LA CHENILLE - 
CLOCK MAGKC - DELREM - HISTO 
DBASE 

LES CONFIDENCES DE LOCOSCRIPT 
LES ENTRAILLES DE DBASE (2) 






sont sur la disquette 20. 





+ E A 
$ SN re 
Ÿ $ ETS 








PTE TETE E ETS R TRES SERE TESTER TITI ILE III LILI LI TELE IEEE EEE ES EEEEEREEEEREEERERREEER, CN 00 ff AE EEE TEE EEE EEE EEEOEEE EEE EEE EEC EEE EE CECEECEEEEOEEE EEE DOEOCECE EEE EEE CEEEEEECEEE EEE TENTE EE 





LOGISTICK éditions - 1988 


© PHOTOCOPIE SEULEMENT 
+ NUMERO DOUBLE 


Tous les programmes du N° 5 


Tous les programmes du N° 10 

























Tous les programmes du N° 15 













Tous les programmes du N° 20 





Meilleure vente au 15/08/88 


COMPTASS X-001 





rieure. La suppression de tous frais inutiles tels que : packaging, 
promotion et intermédiaires, permet de les proposer à un coût 
défiant toute concurrence, soit : 150 F TTC pièce ! 





Regroupé par domaine d'activité, chaque programme a fait ou fera l'ob- 
jet d'une fiche technique le décrivant. Ces fiches techniques sont 
publiées tous les mois et le numéro de l'ECHO contenant celle d'un pro- 
duit se trouve dans la colonne "Cf ECHO N°" 


Livrés sur disquette avec tous les fichiers utiles à leur utilisation, les 
EXCLUSIFS ont été testés avec une rigueur toute particulière et sont 
toujours accompagnés d'une notice permettant leur rapide prise en 
main . 


Ces logiciels sont de qualité professionnelle et le prix exceptionnel de 
chacun n'est dû qu'à l'importante économie réalisée sur des frais sou- 
vent inutiles comparativement à l'intérêt qu'ils représentent pour les 
utilisateurs. 


GESTION/COMPTABILITE 


Réf. Titre Objet Prix TTC CfECHON° 
X001 #  COMPTASS Gestion d'associations complète 150 20 

X 003 GESTCOMPTE Gestion budgétaire multi-usage 150 20 

X 005 GESTIT Gestion de titres pour sociétés 150 21 

X 008 BOURSITEL Gestion de portefeuilles avec liaison minitel 150 22 

X 014 PLUME Gestion de la correspondance 150 22 
VIE PRATIQUE 

Réf. Titre Objet Prix TTC CfECHON° 
X 002 # NOUMEROLOGIA Etude de la personnalité (numérologie) 150 20 

X 011 SUPER TURF Pronostics pour courses de trotteurs 150 21 

X 012 GENEALOGIA Généalogie ascendante sous DBASE 150 21 
X015 FOOT-BALL Résultats et statistiques du championnat 150 22 

X 016 PAPY Généalogie sous BASIC 150 22 
PROGRAMMATION/UTILITAIRES 

Réf. Titre Objet Prix TTC CfECHO N° 
X 004 © ROTAMAT Redéfinition de fontes pour ROTATE + 4 fontes 150 20 

X 006 AIDECPM Version française de HELP pour CP/M 150 21 
X009 #© PACK BASIC Basic étendu avec grandes copies d'écran 150 21 
X010 %# EDIT 2000 Editeur "pleine page” de haut niveau 150 21 
SCIENTIFIQUE/TECHNIQUE 

Réf. Titre Objet Prix TTC CfECHO N° 
X 007 # ELECTRON Calcul d'amplificateurs 150 21 
JEUX 

Réf. Titre Objet Prix TTC CfECHO N° 
X 013 AVENTURES Conception de Jeux assistée par Ordinateur 150 21 


# Nouvelles versions au 01 Septembre 88 
© 9512 avec imprimante compatible Centronics. 





RTS LES EXCLUSIFS - L'ECHO DU PCW N° 22 





L E D _E T A I L 


Boursitel est capable d'aller rechercher sur le mini- 
tel tous les cours d'un marché quelconque en trois 
pressions de touches. Signalons que le program- 
me est prévu pour fonctionner exclusivement avec 
la “Côte Desfosses" accessible en 3615 par trois 
codes différents : CD, CD1 et CD2. 


Le coût d'une consultation varie en fonction de la 
quantité d'informations consultées. A titre 
d'exemple, la totalité de la récupération de l'en- 
semble des cours du marché à règlement mensuel 
revient à 6.00 Francs ce qui est dérisoire compte 
tenu du temps gagné. 


La connexion impose tout de même la présence 
d'un minimum de matériel soit : 

Un cordon minitel, une interface RS 232 et un 
minitel avec prise retournable (si vous doutez 
qu'elle le soit, appelez-nous). 


Une fois chargé, le logiciel demande sur quel 
fichier nous allons travailler puis attend que nous 
appelions le serveur par téléphone (3615 + CD) et 
que nous pressions une touche à l'apparition du 
menu principal de la Côte Desfosses. C'est telle- 
ment facile qu'un enfant pourrait le faire ! 

Ensuite, BOURSITEL s'occupe de tout : Tourner 
les pages, lire les informations utiles (nom des 
titres, cours précédents, derniers cours et varia- 
tions), les mémoriser et déconnecter quand la lec- 
ture est terminée. A ce stade, nous pouvons sau- 
vegarder l'ensemble de ces informations dans 
notre fichier de valeurs et profiter des options de 
gestion du logiciel soit : historique par titre, gra- 
phique historique (pas très précis c'est vrai), lectu- 
re et modification du fichier. 


Notons que la partie gestion minitel peut être 
reprogrammée afin de la rendre plus sélective 
quant aux titres pris en compte par boursitel et ce, 
sur tous les marchés présents dans le serveur 
(hors côte, second marché, comptant, etc….). 


GS CREDIT LYONMAIS CI 529.0 0.00 
HOUR TES 
jun 
62 M M ous 157.00 fs 
ë Eh L . THTE il 
he FE. Ha 1e 
dl 2 TS w2.10 Re 
42 CEA 0. 1450.00 1450.00 
BEEE 218.00 283.00 
ETAIENT 17e 110.0 
ËC nt ars à 4 .00 
47 CLUB MEDITERR UN 47.4 


ATelU ER 


Ta. 







je se donner la peine 
aisir le moindre cours 





MACHINE : 8256/8512/9512 
AUTEUR : HUBERT VIALLET 


ss É es (] 
LIRE les NONS des actions sersrerrererettentt 
i 8 
Le cl tions (6 derniers Cours Fe dl 
ie ne en À 
We sua, a date choisie sssrreerrterttt | 
CORRIGER un cours (€ ou plusieurs D'anenennoneeessset : 
SUPPRIMER une ACTION (non et AT TS 
[] 


i MENU 
Revenir au tre Choix 


taper la lettre de vo 


EN CONCLUSION 


Aucun spéculateur, voir même amateur de prodige 
informatique, ne peut décemment résister à un tel 
bijou dont le succès est assuré tant il est simple, 
spéctaculaire et efficace. 












—— 







We, 1 
à Win ê — 
CA D © 
RTII Nr 










LES EXCLUSIFS + L'ECHO DU PCW N°22 


FICHE TECHNIQUE N° 14 







secrétaires efficaces 
énérale, de tous ceux 


flers, PLUME est un pro- 
particulièrement astucieux, 


- habitudes car il transforme le PCW 
“en super correspondancier comme 
ucun programme n'avais jamais su 
le faire jusqu'à présent... 


COTECEEEPEECEPEPEEEEPEECECSEECEEEECEPEPEEECEEECOEEOPEEEEEEEEERPEPEPEEEEEEENETE 
00000000 00000000200 000 200000000000 0000 000000000000 000 0000000000 00000000 0000000000 00000 000000000 000000000000 00000000 00000000 000 00 
00000000 00000000 0000000000 000000000000 00000000 000 0000000000 00000000 0000000000 008 0000000000 0000000000 000 0000000000 000000 0000000000 
0000000 00000000 000000 00000000 00000000 0000000000 000 00000000 000 00000000 0000000000 0 000 Re DR 0 RS en one ess ses sen es nee eee 
0000000000000000000000000 0000000000 000 00000000 0000000000 000 00000006 0000000000 0000 00000000 000000000000 000000000000 00000 0000000000 
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LHOLE LIRE IXPRINER NODIFIER SUPPRINER * FIN * 
INDIQUEZ LE NON DU TEXTE RECHERCHE : RELANCE 1 
Vous avez souscrit auprès de notre compagnie d'assurance 


i un contrat aulti-garanties, 


Sauf erreur de notre part, la prine annuelle dont l'échéance est 
fixée au 31 Janvier, ne nous à pas été réglée, 


1 
l C'est pourquoi, j'ai l'honneur de solliciter de votre anabilité 
LOCICIEL DE TRAITEMENT DE CORRESPONDANCE ‘Plume’ Version 1.2 


BOILAMIMANUE UNE PAGE D'ETIQUETTES UN TEXTE UNE FORMULE UNE LISTE # MENU * 


DIQUEZ LE NOM OU LA FONCTION DE L'EXPEDITEUR : CLIENT 
Charles DUPONT 
67, Avenue TRUDAINE 


69000 LYON 

Tél 23,45.67.89 
CETTE ETIQUETTE EST ELLE CELLE RECHERCHRE ? ( Qui/Non ) 0 
INDIQUEZ LE NON DU TEXTE RECHERCHE : RELANCE 1 
INDIQUEZ LE NOM DE LA FORMULE RECHERCHEZ : CLIENT 


INDIQUEZ LES ELEMENTS VARIABLES : * LA DATE DU JOUR ou date de départ : 29 Fevrier 88 
# L'OBJET DE LA LETTRE : t er rappel 
# LA REFERENCE : 11/0 2%28 


“PLUME: 
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PLUME n'est pas un traitement de texte au sens large 
du terme. Il a été volontairement conçu pour le traite- 
ment du courrier courant et c'est tout. 

Nous allons voir qu'il le fait parfaitement et ce, avec une 
organisation quasi démoniaque ! 


PLUME gère quatre types d'informations complémen- 
taires : les adresses de destinataires, mais aussi leur 
fonction, les références des expéditeurs, les titres et for- 
mules de politesse et enfin les textes de lettres. 

Il est donc possible d'entrer tous les destinataires avec 
qui nous entretenons une correspondance régulière 
mais aussi toutes les personnes, ou les services d'une 
entreprise. 


La réalisation d'un courrier fini se passe ainsi : Choix du 
destinataire, du rédacteur, du texte de la lettre, du titre 
(Monsieur, Cher Ami, etc...) et de la formule de polites- 
se. Ensuite, sont entrés, l'un après l'autre, les para- 
mètres variables : date d'envoi, objet et références. Le 
tour est joué, le courrier s'imprime sur feuille A4 en qua- 
lité courrier avec une présentation impeccable qui n'a 
demandée aucun effort. 


Une fois imprimé, le courrier est archivé par le logiciel 
afin de garantir un suivi dans le temps qui séduira plus 
d'un adepte de l'organisation. 


Pour terminer, parlons tout de même des limites qui 
détermine précisément le domaine d'activité du logiciel : 
Les lettres ne devront pas exéder 20 lignes de textes de 
60 caractères par ligne (1200 signes au total). 
L'impression se fera toujours en qualité courrier sur 
feuille A4 (21/29.7 qui existe maintenant en continu). 


EN CONCLUSION 


Très ciblé, PLUME est redoutablement performant pour 
l'envoi de missives impeccables avec un minimum de 
personnalisation. || sera parfait pour les relances, les 
notes de service, les courriers d'information, les com- 
mandes à l'ECHO et bien d'autres documents que parti- 
culiers, mais surtout entreprises, ne se lassent jamais 
d'envoyer. C'est pour cela qu'il a été conçu et dans ce 
rôle, il est plus que parfait. 
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Arrivé à point pour démarrer la saison 88/89, 
FOOT-BALL, ne se contente pas de cumuler les 
résultats. Mieux, il organise le classement et 
donne, par équipe, les performances significatives 
pour toute étude quant à d'éventuels pronostics 
(idéal pour le loto sportif, mais surtout, ne le répé- 
tez pas...). 


Organisé autour d'un menu principal qui se charge 
de renvoyer sur toutes les options disponibles, 
FOOT-BALL est plus que simple à utiliser. Dès le 
début de l'année, on entre toutes les équipes en 
présence et, journée par journée, on donne les 
résultats des matchs en saisissant d'abord l'équipe 
qui reçoit, puis, les scores et enfin, l'équipe reçue. 
A noter que les corrections au niveau des équipes 
en présence, restent accessibles à tous moments 
de la saison. Ceci est rarement utile mais précieux 
tout de même. 


FOOT-BALL peut aussi convenir pour des divi- 
sions autres que la première. Ainsi, divisions 
d'honneur et divisions blindées (si, si), pourront 
être tenues à jour et les statistiques issues du pro- 
gramme pourront servir de point de repère à ceux 
à qui il importe de suivre les résultats d'ensemble 
(dirigeants, entraineurs, joueurs et coupeurs de 
citrons.….). 


LUE 
GDAL AUERAGE: 3 
VICTOIRES À DOMICILE : 67 x 
VICTOIRES EXTERIEURES : 0 z RELAX 
NULS 4 DOMICILE: 0% 
NULS EXTERIEURS  : 0% RE TS 


DEFAITES À DOMICILE : 33% 


DEF : a 
MATAITES EXTERIEURES : 0% AITES : 33% 


PLACE DANS LE CHAMPIONNAT : 1 
ATTAQUE DANS LE CHAMPIONNAT : 1 
DEFENSE DANS LE CHAMPIONNAT : 8 


NOMBRE DE JOURNEES A DOMICILE : 3 


QUELLE JOURNEE VOULEZ-VOUS OBSERVER ? 3 


NICE 3-2 PARIS 

LILLE 1-1 LWAL 

CHRES 1-4 PARIS y 

PARIS 1-2 NICE cr 
BORDEAUX 3-1 LAVAL a 
LILLE 1-4 LIN 

CAES 3-3 BASTIA 

MKCCIO 3-1 NINTES 


VICTOIRES INTERIEURES : 3 NULS : 2 


NOMBRE DE BUTS : 


VICTOIRES EXTERLEURES : 
4! 


NONBRE DE JOURNEES À L'EXTERIEUR : @ 


3 


né à prendre en char- 

résultats du champion- 
at de France afin de permettre un 
suivi précis de l'ensemble et des 
erformances détaillées de chaque 
équipe inscrite. 





TITRE : : FOOT-BALL 


VOTRE CHODŒ 
CLASSEMENTS ET RESULTATS DE LA 3eme JOURNEE 
SAISON 88 


BAL POLE PO PE RULES ML I 


Smith er 


EN CONCLUSION 


Suivre les résultats du championnat de France 
pour s'enrichir au loto sportif n'est pas le seul 
usage que l'on puisse trouver à un tel logiciel dont 
les qualités de souplesse et d'utilité en font un par- 
fait exemple de ce qu'offrent les Exclusifs : 

Des logiciels vraiment utiles ! 
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FICHE TECHNIQUE N° 16 - PAPY 
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Avec le logiciel PAPY, Il n'est plus besoin de se 
préoccuper d'un quelconque mode de classement de 
ses ancêtres, pas plus que de gratter d'innombrables 
fiches en carton qui iront rejoindre de non moins innom- 
brables boîtes à chaussures au milieu desquelles, il sera 
bien difficile de retrouver instantanément l'anecdote rela- 
tive à grand-mère Rosalie de la 9ème génération. 


PAPY gère une véritable base de données qui est pour 
lui un arbre "virtuel". Peu importe la complexité des liens 
de vos ascendants, PAPY réunit à tout moment la totali- 
té des informations relatives à un individu donné. De 
plus, c'est lui qui se préoccupe d'un classement perfor- 
mant de vos ascendants et de l'intégrité de vos don- 
nées. 








TITRE : PAPY 


0000000000 00000000000 00000000 0000000000 000 00000000 00000000 000000 00000000 000 00000000 000000000000 00000000 SN 0 0 SNS NS ones one ne 


En outre, PAPY, grâce à ses modules externes, vous 
décharge de la majorité des contraintes administratives. 
Plus besoin de rédiger dix fois la même lettre à destina- 
tion de dix mairies différentes, PAPY le fera pour vous et 
il mémorisera vos différents courriers successifs. 


000000000000 00000000 000000000000 00000000 0000000000 0000 0000000000 0000000000 00000 ND NON DS ne SN DS sans nn e en eene eee 


PAPY représentera, quand vous le désirerez, un arbre 
sur quatre générations à partir d'un individu quelconque, 
en vous permettant ainsi de voir globalement quels sont 
les ancêtres où des détails manquent encore, en satis- 
faisant votre désir légitime de voir l'arbre se concrétiser. 


Vous voulez créer une mémoire évolutive rassemblant 
tout ce que vous allez découvrir sur votre “clan”, PAPY 
ne fera pas tout le travail pour vous, il exécutera simple- 
ment les tâches les plus fastidieuses ne vous laissant 


000000000000 00000000 000000 00000 000 0000000000 00000 000000000000 00000 0000000 000 PNR P NS NS SN en 00 0000000000 000000 0060000000 


000000000000 0000000000000000000 000 00000000 000 000000 00 000 00000000 000 00000000 0000000000 200 0000000 0000000 0 00000000 0000000 


Papystat 1.7 - Recherche à critères nultiples sur la base de données 


Remplissez la grille - pour annuler, répondez * à l'une des questions 
Pour arreter, répondez FIN à la prenière question 


Le non ou le prénon contient :RUIL : Chaine à rechercher que le côté exaltant de la recherche. 
Date de naissance :18j 1), Cou 0x 0m, =? si inconnue 
Date de décès :M 5), ou 50x00, =? si inconnue 
Nonbre de frères et soeurs :MÆEï4 1 ),Cou =m E N C O N C L U S I O N 
Départenent :ÆEBi 1), Cou mn RE 
Le lieu de naissance contient :MUIAAN : Chaine à rechercher 
Les comentaires contiennent :f : Chaine à rechercher Réalisation d'une qualité remarquable tant au point de 


vue de la convivialité que des performances, PAPY fait 


Nunéro de génération :MX) 5 ),€ ou =mn © 
Sexe (WF) :H) s: jtre caractère refusé honneur aux Exclusifs et enchantera plus d'un généalo- 
La clef d'accès contient 1 À dites À Esherihes giste par l'aide précieuse qu'il ne manquera jamais d'ap- 


porter à tous les niveaux du travail de fourmis que cette 
science impose. 


Papy 4.3 - Mère de MIART Narie-Odile -  3ène génération 


Le pointeur se trouve actuellement sur : 
LEROUX Geneviève née le 10.08.1900 à Ardres (62) t le 01.12.1956 
Frères : 


. LEROUX Albert né ! at 08. 1 Ardres (62) 
. LEROUX Alexandre né le 01.69.1918 à Crespy-le-neuf (10) + Le 19.11.1986 


Soeurs : 

. LEROUX Marie-Adrienne née Le 11.11.1896 à Ardres qe t le 3 té os gen 7 
LEROUX Thérèse née Le 07.09.19 à Crespy-le-neuf (18) + le 28.61.1985 À | 5] 
. LEROUX Germaine née Le 19,04,1906 à LEA le- meurs (16) t le 28.61.1973 = a 
. LEROUX Régine née le 24.02.1908 à Crespy-le-neuf (10) 

: LEROUX France née le 10.07.1915 à Folie Brune (10) 


Choisissez une option (ou frappez M pour le aenu) 
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- Conformément à la volonté de l'ECHO de fournir 
une prestation exceptionnelle, 5 nouvelles ver- 
Slons d'EXCLUSIFS sont disponibles à compter 
du 1er Septembre 88. Toute commande passée 
avant cette date concernait les anciennes ver- 
sions. Les possesseurs des 5 logiciels concernés 
(liste plus bas) peuvent échanger leurs anciennes 
versions contre les nouvelles. Pour cela, il suffit de 
suivre les indications de l'encadré ci-contre. 


ISTE DES NOUVELLES VERSIONS AU 01/09/ 


X-001 COMPTASS gestion d'associations 
X-002 NOUMEROLOGIA numérologie 
X-007 ELECTRON 
X-009 PACK BASIC 
X-010 EDIT 2000 


calcul d'amplificateurs 
fonctions graphiques 
éditeur ASCII 


Pour proposer votre logiciel à LOGI'STICK dans le 
cadre d'une éventuelle publication dans la rubrique 
des EXCLUSIFS, voici comment procéder : 


- Effectuez tous les dépots que vous jugerez utiles 
pour la protection de vos droits (voir encadré ci- 
contre). 
- Faites parvenir à LOGI'STICK les éléments sui- 
vants : 

- Disquette(s) du logiciel dans sa ver- 


- Texte sur disquette au format ASCII, ou 
Locoscript, des textes de la notice. 

- Une notice avec copies d'écran et illus- 
trations si elle le nécessite. 

- Les copies d'écran bien noires et toutes 
les illustrations devant figurer dans la 
notice. 


LOGI'STICK s'engage à ne faire aucune utilisa- 
tion, autre qu'une évaluation, du logiciel tant que le 
contrat d'édition n'aura pas été signé par vous et 
par nous si le logiciel le justifie. 





ANNEXE EXCLUSIFS 


Retournez à l'adresse ci-dessous les disquet- 
tes originales après en avoir fait une copie de à 
travail, le temps que les nouvelles versions 
Vous parviennent. 
Joignez 30 F par référence au titre de la parti- 
cipation au frais d'échange et d'expédition. 
Les nouvelles versions des logiciels ne modi- 
fient en rien les fichiers déjà constitués dont 
vous prendrez soin de garder une copie de 
sauvegarde. 

ADRESSE D'EXPEDITION 


LOGISTICK 
Service technique 
CAPN - Le Bonaparte 
boîte 49 
93153 Le Blanc-Mesnil Cédex 
FRANCE 








Institut Natioanal de la Protection Industrielle. 


INPI: 26 Bis rue de Leningrad 75008 Paris. 
Tel (1) 42.94.52.52 
3615 CODE INPI 


Association pour la Protection des Programmeurs 


APP : 119 rue des Flandres 75019 Paris. 
Tel (1) 40.35.03.03 


1 p Ê 


Chez votre huissier habituel qui en dressera constat. 
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= 
Cours n° 


J'apprends. 


le langage machine ! 


Par Philippe THOMASSIGNY (Métal WOLF) 





A NE PA 


LE LOGICIEL ou 
SOFTWARE 





1: PCW EGAL ORDINATEUR 





Qu'est-ce qu'un ordinateur ? 


Un ordinateur est composé le plus souvent de : 
- Un clavier (AZERTY ou QWERTY suivant le 
pays). 

- Un écran (Noir et Blanc, Vert, Couleur...). 

- Un lecteur de disquette ou de cassette (ou 
plusieurs). 

- Une mémoire centrale ou micro-calculateur 
(UC) (c'est l'électronique, qui ne se voit pas). 

- Accessoires style table traçante, crayon 
optique, souris. 


Toute la logique et le travail de l'ordinateur se 
trouvent au niveau du LC. On fera la différence ici 
entre le HARDWARE, qui est tout le matériel phy- 
sique qui permet à l'appareilde fonctionner (ex : 
l'écran, l'imprimante.) et le SOFTWARE, ou enco- 


NFONDRE... 


LE MATERIEL ou 
HARDWARE 


Réclamée à corps et à cris, l'initiation au 
ngage machine et, par voie de consé- 
uence à l'assembleur, fait un retour en 
orce dans les colonnes de l'ECHO DU 

PCW avec ee etits rappels indis- 

pensables à un bon dou 


re le LOGICIEL en Français, qui est l'essence’ de 
l'ordinateur. C'est tout ce qui constitue les lan- 
gages, les programmes, les données, etc... 


On peut comparer le Hardware avec un corps 
humain, et le Software à ses pensées ou son 
âme... Comme Electric Dreams (La Belle et 
l'Ordinateur, pour les puristes).. Mais soyez sans 
inquiétude : un ordinateur ne peut ni penser, ni 
créer. Il ne fait que ce qu'on lui dit. D'ailleurs, un 
ordinateur ne se trompe JAMAIS (on l'entend sou- 
vent, Ça...). S'il fait une erreur, c'est qu'il a été mal 
programmé. Errare humanum est. 


AP Et dedans ? 


Sans faire un cours d'électronique sur les péri- 
phériques, il est tout de même indispensable de 
les citer : 


- Le clavier : A chaque touche enfoncée, un 
signal codé electriquement est envoyé au C 
qui va l'interpréter comme il le doit. 


- L'écran : il 'affiche' une partie de la mémoire 
du LC, convertie en points par un circuit intégré 
(puce) : le VDU. 


Exemple : pour afficher une lettre, il y aura 64 
points en service, les BITS-IMAGES, allumés 
ou éteints. 


- Le support magnétique : échange des don- 
nées avec le LC sous forme de signaux élec- 
triques, de même que le clavier ; mais les 
transmissions se font dans les deux sens. Le 
support magnétique sert à stocker des données 
(comme un disque garde la musique). 


- L'imprimante : le uC envoie des signaux élec- 
triques à l'imprimante, qui va les interpréter. 


EP” Lo UC : 


l'est composé dans l'ordre d'importance : d'un 
MICROPROCESSEUR ou LP, qui peut être plus 
ou moins puissant. Les UP les plus importants sont 
les suivants : les 6502, qui équipent COMMODO- 
RE, ORIC, APPLE... les 6800 qui équipent les 
THOMSON, les Z-80 qui équipent les AMSTRAD 
(Vous connaissez ça, vous? ), les 68000 et les 
80000 qui équipent les gros ordinateurs person- 
nels (IBM, GOUPIL, XEROX, MACINTOSH...). 
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Au LP est associé le ' CODE MACHINE" (CDM), 
qui est sa façon de converser avec l'extérieur. Il 
est propre à chaque UP, cependant, bien que diffé- 
rent suivant les LP, les résultats obtenus peuvent 
être les mêmes. Aussi, on a décidé de créer 
l'ASSEMBLEUR, qui est un ensemble de mots 
explicitant les actions faites par les différents P. 
Ces mots sont l'abréviation de l'effet produit sur le 
uP. Ces abréviations sont en anglais (n'oublions 
pas que l'informatique est d'origine américai- 
ne).Vient ensuite la MEMOIRE, qui est en général 
un ensemble de RAM (Random Access Memory = 
Mémoire à accès aléatoire) et de ROM (Read Only 
Memory = Mémoire à lecture seulement). Ces 
mémoires sont des puces qui servent à stocker 
des données sous forme de signaux électriques. 
On peut consulter et écrire dans les RAMS, par 
contre, on ne peut que consulter les ROMS. Ces 
dernières ont l'avantage de conserver les données 
au même titre qu'un support magnétique. 


Dans ces mémoires sont stockés les pro- 
grammes en code machine et les données. Le uP 
converse, en fait, sans cesse avec les mémoires : 
il prend les données qu'il va interpréter ou il les 
stocke. Ce UP exécute environ UN MILLION d'ins- 
tructions à la seconde, et cela sans cesse. De 
plus, un LP ne sait qu'additionner, soustraire, faire 
des tests, échanger des données en mémoire. 
C'est un travail de romain qui se passe entre le 
moment où vous tapez une lettre sur le clavier et 
où celle-ci s'affiche à l'ecran. ll y a environ 20000 
instructions entre ces deux moments... 





L'horloge : elle fournit un signal électrique alter- 
natif et carré. À chaque top (valeur positive ou 
‘haute'), le LP exécute une instruction ou une par- 
tie d'instruction de plus (suivant la complexité de 
l'ordre demandé ou à exécuter). 

Les autres circuits sont moins importants, mais ils 
sont cependant à connaître : Les P.I.A. Ce sont 
des sortes de traducteurs entre le LC et l'extérieur. 
C'est le Z-80 SIO qui s'occupe de la communica- 
tion avec le clavier, le lecteur, etc. Sur 
l'Amstrad.Et enfin les VDU. Ce sont des puces 
chargées de lire, indépendamment du pP, un pan 
de mémoire dans les RAMS, de convertir les don- 
nées lues en un signal analogique qui sera envoyé 
vers l'écran. 





AP Un peu de vocabulaire : 


Un BIT : C'est une impulsion électrique. C'est la 
base des échanges entre 1P et RAM, entre LC et 
extensions. Cette impulsion peut être soit nulle 
ou négative : elle est alors notée 0; soit positive : 
notée 1. Le LC connaît donc en fait deux types de 
données notées 0 et 1. Il compte donc en fait en 
base 2. Chaque bit prend TOUJOURS la valeur 0 
ou la valeur 1. Pour envoyer un ordre au uP, il 
faut, en fait, lui envoyer un mot de huit bits. Ce mot 
s'appelle un OCTET (Byte en anglais). L'octet est 
donc à la base des échanges d'instructions et de 
données à tous les niveaux dans l'ordinateur. On 
pourrait alors se demander : "Mais l'ordinateur 
connaît alors seulement 8 valeurs différentes pour 
un octet?" Il n'en est rien : il en existe en fait 256... 
mais nous verrons cela plus tard. 


“HR 


ANALOGIQUE DIGITAL 


SIGNAL NUMERIQUE par opposition au signal 
ANALOGIQUE : le signal analogique est le signal 
électronique tel quel. Le signal numérique est un 
code de 0 et de 1 qui sert à transmettre des don- 
nées. On pourrait assimiler le signal analogique à 
la voix humaine et le signal numérique au code 
morse. 


La MEMOIRE est un grand ensemble de bits 
groupés par huit sous forme d'octets. Chaque 
octet est affecté à un numéro (comme le numéro 
de Sécurité Sociale pour nous, pauvres mortels...), 
ce numéro est appelé ADRESSE-MEMOIRE ou 
CASE-MEMOIRE ou encore MEMOIRE. Les 
RAMSs se mesurent en KILO-OCTETS (Ko) : Mais 
ATTENTION : 1 Ko = 210 = 1024 octets. De nos 
jours, une RAM (j'entends chaque puce) d'ordina- 
teur normal se situe entre 64 et 256 Ko. Ainsi, une 
RAM de 64 Ko possède 64x1024-65536 octets et 
65536*8-524288 bits. Actuellement, les 
Américains viennent de mettre au point une tech- 
nologie qui permet de construire des RAMSs de 
512 Ko... Comptez le nombre de bits. 


Chaque octet d'une mémoire peut prendre une 
‘valeur entre 0 et 255 compris (voir chapitre Il). 
Cet octet peut être soit une instruction qui va servir 
à gérer le P, soit une donnée stockée. Un 
ensemble d'octets UTILES s'appelle un PRO- 
GRAMME. Celui-ci peut contenir de 10 à 400000 
octets (ou plus) suivant son utilisation. 

Les INSTRUCTIONS du LP servent à lire, écrire, 
tester et additionner des octets dans la mémoire. 
ATTENTION : Beaucoup de manuels d'assem- 

bleur comparent les octets d'une RAM avec des 
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casiers ou des tiroirs, c'est l'image classique, mais 
FAUSSE : en effet, dans un tiroir, on peut stocker 
beaucoup de choses à la fois. La compa- 
raison de la RAM avec un tableau sur 
lequel on ferait un quadrillage et où l'on 
inscrirait les octets dans chaque case 
serait plus juste : il n'y a qu'un seul 
nombre par case, ou par octet. 


Une PUCE ou un CIRCUIT INTEGRE 
est un composant électronique avec de 
nombreuses “pattes” (Mais si, vous 
connaissez). A titre indicatif, une puce 
contient d'une dizaine de transistors (pour 
les plus simples) à plusieurs millions (pour 
les microprocesseurs)…, et le tout dans un 
tout petit carré de silicium (métal spécial 
dit 'semi-conducteur') qui ne fait pas plus 
d'un centimètre de côté. Il existe plusieurs milliers 
de puces différentes qui ont des fonctions des plus 
inattendues : vous connaissez la Puce Thomson ? 
(PS : pour ceux qui regardent les pubs du soir sur 
leur PCW, c'est une machine à laver...) 


Le BASIC et autres langages : ce ne sont en 
fait que des programmes en assembleur, com- 
plexes, qui recueillent des données entrées au cla- 
vier et en exécutent les séquences. Absolument 
tous les langages évolués sont en code machine 
(DBASE, MULTIPLAN, WORDSTAR, BASIC, 
LOGO, PASCAL, etc...) 


Le BINAIRE, ainsi que l'HEXADECIMAL sont 
des bases de notation au même titre que le déci- 
mal. Le binaire utilise deux signes; l'hexadécimal 
en utilise 16(0à9et AàF). 


Une TABLE est un ensemble d'octets consécu- 
tifs dont chacun a un rôle ou une fonction précise. 





0 - SAVOIR COMPTER EN LANGAGE MACHINE 


Non, vous n'échapperez pas à l'apprentissage du 
binaire : c'est une formalité obligatoire! Mais 
comme tout PCWiste est très intelligent, ça va être 
très rapide, non? 


On a vu précédemment que la base du 
uP est l'octet, composé de bits; et que le 
uC compte en base deux, ou BINAIRE. 
Chaque bit est dénommé différemment sui- 
vant sa place dans l'octet : comme on 
dénomme les unités, les dizaines, les cen- 
taines.. 


Octet: 


10 1000 

BIN°_ 765 432 
Par analogie au décimal, chaque bit a un degré 

de signification d'une puissance de deux. Chaque 


Comparaison : 


ler chiffre n: 
2ème chiffre nm: 
3ème chiffre o: 


8ème chiffre t: 





LU | 1 
Bits n° 7 6 5 4 3 
1 


Bits n° 15 14 13 12 1 








bit a donc un POIDS plus ou moins fort suivant sa 
place dans l'octet : 


. DECIMAL BINAIRE 


unités: n*100=n (de 0 à 9) 
dizaines: m*101=10*m 
centaines: 0*102=100to 


n*20=n (de 0 à 1) 
nt2l=2tm 

o*22=440 
t*107=10000000t t+27=-128+t 
9*107+9*106+..+9+100 1227414264, ,+1+20 
= 99999999 =255 


On peut ainsi compter avec huit bits, en base deux, jusqu'à 255, 
soit 256 valeurs (0 compris). 


On notera donc : 


00000000 = 0 00001000 = 8 
00000001 = 1 00001001 = 9 
00000010 = 2 00001010 = 10 
00000011 = 3 00001011 = 11 
00000100 = 4 00001100 = 12 
00000101 = 5 00001101 = 13 
00000110 = 6 00001110 = 14 
00000111 = 7 Etc... 
Exemple : 


L'octet 00110101 aura la valeur de 53: 


00110101 /27*0+26*0+25*1+24*1+23*0+22*1+21*0+20*1=0+0+ 
32+16+0+4+0+1=53 


2900000000004000000000000000000000000000000Q 


On pourrait de même coder un nombre sur 
16,32,57,n bits. D'ailleurs, le codage sur 16 bits 
est très employé -grâce à DEUX octets- et permet 
de ‘compter’ jusqu'à 65536. Les calculs se font de 
même, mais on différencie les deux octets à cause 
de leur poids différent : l'octet correspondant aux 
puissances basses de deux (0 à 7) s'appelle 
l'OCTET LE MOINS SIGNIFICATIF ou OCTET DE 
POIDS FAIBLE et l'autre (puissances de 8 à 15) 


ler octet 2ème octet. 


PS 


2 1 
2 1 


3 
3 


est l'OCTET LE PLUS SIGNIFICATIF ou OCTET 
DE POIDS FORT, abrégés respectivement OMS 
et OPS (A ne pas confondre avec le poids de 
chaque bit). 


ET INITIATION AU LANGAGE MACHINE (1) + L'ECHO DU PCW N° 22 





Fr Additions : 


Tout comme en décimal, on peut additionner 
des nombres binaires. A savoir : 


0+0=0 
0+1=1+0=1 
1+1=0 retenue=1l 
1+1+1=1 retenue=1l 
Exemple: 
Retenues: 1 1 1 1 1 
00110101 53 
+ 0 1 1 0 1 1 O0 0 + 108 
10100001 = 161 


2 00000000000000002%2000000000000000000000000 


REP Nombres négatifs : 


On peut (mais pas obligatoirement) considérer 
le 7ème bit comme le signe de l'octet : s'il est à 1, 
la valeur est négative, et évidemment positive s'il 
est à 0. La valeur n'est donc codée plus que sur 7 
bits. Elle va donc de 0 à 127. Mais le signe nous 
permet d'avoir les valeurs opposées : de -128 à -1 
(en effet, le ZERO étant le même pour les 
nombres négatifs et positifs, il reste une valeur : le 
-0', que l'on affecte à la valeur -128). Il y a donc 
toujours 256 valeurs différentes, mais de -128 à 
127. L'octet est alors appelé OCTET SIGNE. Mais 
ATTENTION : le nombre négatif n'est pas le même 
que le nombre positif affublé du signe (comme en 
décimal) : en fait, le décompte se fait à l'envers 
(pour raison d'opérations et de calculs complexes 
que nous verrons plus tard) : 


Le zéro est toujours 0 0 0 0 0 0 0 0 
-1 sera 11111111 
et non 10000001 
-2 sera 11111110 
et non 10000010 
-3 sera 11111101 
et non 10000011 
-53 sera 11001011 
et non 10110101 


Pour passer d'un nombre positif à son opposé 
en binaire, on inverse tout d'abord les bits, puis on 
ajoute 1. Cette opération s'appelle le COMPLE- 
MENT A DEUX. 





290090000000000900090000000000000000000009000 


Exemple : 
53 est 00110101 
1/ Inverser les bits 11001010 
2/ Ajouter 1 : 11001011 (-53) 
3/ Vérifier : 00110101 53 
+ 11001011 =53 
(Retenue perdue) 00000000 0 


39999909909990000090009000000099009080000090006000 00 


Un truc pour le décimal : pour trouver la valeur 
réelle d'un octet signé, il suffit d'additionner le 
nombre négatif à 256. 


209000000000000000000000000000000000000000 


Exemple : pour -66 
256+(-66)=190 
ce qui donnera en binaire 10111110. 


2499090900000000000000400000404490009900904040040400Q 


AP Soustractions : 


Faire une soustraction ? Mais oui, c'est simple : 
il suffit d'ajouter l'opposé du nombre! (nous verrons 
plus tard que le UP sait faire aussi cela). 


29904999999999909099040000400000000009040 0400000 


Exemple : 

pour faire : 53 - 1 

il suffit de faire : 53 + (-1) ! 
Facile, non ? 

Ainsi: 53 00110101 
EL +571 + 11111111 
52 00110100 


200000000000000000000000000000000000000000 


AP Les opérations logiques : 


Il'est possible de faire des tests, des opérations 
directement sur les bits. Pour cela quatre opéra- 
tions existent : elles sont appelées AND, OR, XOR 
(ces opérations se font entre chaque bit de même 
poids de deux octets différents) et CPL qui s'ap- 
plique directement à un octet : 

AND renvoie un 1 si les deux bits considérés sont 


égaux à 1. 

OR renvoie un 1 si au moins un des deux bits est 

égal à 1. 

XOR renvoie un 1 si seulement un des deux bits 

est égal à 1. 

CPL renvoie un 1 si le bit considéré est égal à O. 
AND OR XOR 

0 AND 0 = 0 0 OR 0 = 0 0 XOR 0 = 0 

0 AND 1 = 0 0 OR 1 = 1 O0 XOR 1 = 1 

1 AND 0 = 0 1 OR 0 = 1 1 XOR 0 = 1 

1 AND 1=1 1 OR 1 = 1 1 XOR 1 = 0 


L'ECHO DU PCW N° 22 - INITIATION AU LANGAGE MACHINE (1) [3e 


CPL: CPL O0 = 1 
CPL 1 = 0 
N.B : en français on parle de ‘ET LOGIQUE" pour 
AND; 'OU INCLUSIF' pour OR; 'OU EXCLUSIF" 
pour XOR et ' COMPLEMENT pour CPL. 


REMARQUE : || n'y a pas de retenue pour ces 
opérations. 


2900 000000000000000000000000000000000000000Q 


Exemples: 
11111111 11111111 11111111 
AND 00110101 OR 00110101 XOR 00110101 
00110101 11111111 11001010 
11001101 11001101 11001101 
AND Q1101100 OR Q1101100 XOR 01101100 
01001100 11101101 10100001 


299900000000000000000000000000000000000000 


Le premier octet s'appelle l'OPERANDE, le 
second le MASQUE, et le test logique, l'OPERA- 
TEUR. Le complément est aussi noté par une 
barre sur l'octet : 


290000000000000000000000000000000000000000Q 


Exemples: 


CPL 11001010 = 11001010 = 00110101. 


2000 000000000000000000000000000000000000000 


Nous verrons plus loin à quoi peuvent servir ces 
opérations pendant ces quelques exercices desti- 
nés à terminer magistralement ce grand retour du 
langage machine à l'ECHO DU PCW ! E. 


29 9090000000000000000000000000000000000000Q 


EXERCICES 


329999909099999990900000000000000000000000000Q0Q 


1. Donnez la valeur de : 00110000, 11001100, 
11101110, 00001001, en valeur normale et en 
valeur signée (octet signé). 


3400000000000000000000000000 000 000000 0Q0QQQ@QQ 
2. Donnez la valeur de :12, 43, 76, 210, 
-128, -1, 32 enbinaire. 
32Q00000000000900000000000000Q0Q0Q0 00001010 0Q0Q Q QQQQ 


3. Donnez l'opposé de : 32, 76, 126, -64, 
-128, 53, 87 enbinaire. 


44 0000000000000000000000000000000000000000Q 


4. Calculez en binaire de : 23+42, 32+89, 
128-1, 10-21, 32+25, 32-25. 


2 00 000000000000000000000000900000000000000 





5. Effectuez les tests logiques : 00010110 and 
11101111, 39 or 128, 00110101 xor 87, 
00000000 or 255. 


299999999000000000000000000000000000000000Q 





3200000000000000000000000000000000000000000@ 


SOLUTIONS 


3299999999990000000000000000000000000000000Q 


î 00110000= 48 ou +48 
11001100=204 ou -52 
00001001= 9 ou +9 


3999999909999900900000000000000000000000000 


2 12=00001100 ; 43=00101011 
76=01001100 ; 210=11010010 


-128=10000000 ; -1=11111111 
32=00100000. 
S] 32=00100000 ; -32=11100000 


-76=10110100 ;-126=10000010 
-53=11001011 ; -87=10101001. 
128 n'existe pas en octet signé ! 


3999999999999909000000000000000000000000000Q0Q 


4 23 00010111 
+ 42 + 
= 65 01000001 
128 10000000 10000000 
ps CPL( 00000001)+1 
127 01111111 


10-21=11110101 
32+25=00111001 
32-25=00000111 


3990490909909000000000000000000000000000000Q00Q 


5 00010110 AND 11101111=00000110 


39 00100111 


OR 28 00011100 
= 00111111 


00110101 
01010111 
= 01100010 
00000000 


XOR 255 11111111 
= 11111111 


2900900000000000000000000000000800000000000Q 


if 


RE CE INITIATION AU LANGAGE MACHINE (1) + L'ECHO DU PCW N° 22 


Service Entreprises: %f 


N'attendez pas pour inscrire votre entreprise en retournant ce jour le bon ci-dessous à : 


O 


LOGTISTICK - CAPN LE BONAPARTE - BOITE 49 - 93153 LE BLANC MESNIL CEDEX 








SOYEZ PRODUCTIF ! 
SOIGNEZ VOTRE COMMUNICATION 


. GAGNEZ DU TEMPS... 





ET DE L'ARGENT ! 


‘Au service de ses lecteurs, L'Echo du PCW met ses compétences, son savoir-faire 


et son important fichier de fournisseurs au service des entreprises de toutes tailles. 


Entièrement gratuit, ce nouveau catalogue ‘‘'entreprise‘* est remis à jour et envoyé 
régulièrement à toute entreprise ou profession libérale qui en fait la demande. 


Les prestations de ce service sont regroupées 
dans un catalogue spécial qui sera adressé à toute demande 
lbellée sur papier à en-tête mentionnant les numéro de SIRET 
et d'APE {ou titre pour les professions libérales), 


PC/PCW la compatibilité est possible avec le service 
entreprise avec un nouveau service de transfert de fichiers 
soit : recopie de fichiers CP/M vers MS/DOS 

ou l'inverse (MS/DOS vers CP/M). 


Ce qui sort de votre entreprise est à son image alors soignez-la avec : 
Papier à en-tête personnalisée en continu 

Facture à en-tête personnalisée en continu 

et tout type de formulaires personnalisés en continu. 


Le service entreprise, c'est aussi une liste de prestataires 
compétents pour résoudre vos problèmes quotidiens comme : 
Programmes sur mesure (tous langages) 

Connexions difficiles 

Maintenance et formation 


De nombreux revendeurs accordent des remises aux entreprises, 
collectivités et professions libérales. Le service entreprise vous en 
donne la liste actualisée. 


SÉSRRSAS E ces Lu RE AT >< 











STE : ___ .  _______ FORME JURIDIQUE® : ________ ____ CAPITAL*: 


ADRESSE COMPLETE : 





NOM ET PRENOM DU RESPONSABLE ACHAT INFORMATIQUE : MR° + MME° - MELLE”° : 


ACTIVITE PRINCIPALE : 








NOMBRE DE PCW EN SERVICE DANS L'ENTREPRISE : 


* FACULTATIF - ° RAYEZ LA MENTION INUTILE 


pm mm mm mm mm 


NOMBRE DE FICHES ETUDIEES 39 


€ QUEST,/REP, ) EXCELLE TRES EO BON 
PRESENTATION 9 8 

QUALITE 
SERVICE 


DELAI 


? 

$ 

l 

REGLEMENT 2 
NAINTENANCE 2 
PACKAGE 4 
2 

4 

l 


PRIX 


FIABILITE 
CONCURRENCE 





Faire de jolis petits questionnaires, 
c'est bien. Les traiter pour en tirer la 
substantifique moëlle, c'est aussi bien, 
mais le faire vite et sans risque d'erreur 
c'est vraiment mieux. L'ECHO nous en 
donne un brillant exemple puisque 
c'est à l'aide du programme que je 
vous présente aujourd'hui, que les 
nombreux questionnaires du mois der- 
nier (plus de 500... Ouf !) ont été entrés 
dans le PCW et ont avoué les chiffres 
en moins d'une seule journée. 


PRINCIPE 


Questionnaires à choix multiples ou classement 
par ordre préférentiel, STAT'MAKER s'adapte faci- 
lement en offrant, dès le départ, le paramétrage 
d'une grille pouvant accepter 25 questions avec 


MOYEN MAUVAIS TRES MA NUL 
5 | 5 
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chacune 15 réponses maximum. Cette organisa- 
tion permet d'adapter le programme à toutes 
sortes de pointages où le choix se limite à une 
réponse qui ne serait que OUI ou NON. Dans un 
registre plus complexe, le programme traite avec 
aisance les questionnaires avec classement 
(Notez de 1 à 5 par exemple) puisqu'il suffit d'af- 
fecter une réponse par note avec, éventuellement, 
une réponse supplémentaire pour les réponses 
indécises. Tout est prévu ! 





indépendamment de cela, le plus grand intérêt du 
programme est de reproduire à l'écran les grilles 
de réponses comme elles se présentent sur le 
questionnaire, le déplacement à travers celles-ci 
se faisant à l'aide des touches de curseur. Si la 
réponse est positive, une pression sur <+> (à 
gauche de la barre espace) et la case est validée. 
En cas d'erreur, c'est la touche <-> (àdroite de la 
barre espace) qui agit. 

Une fois la grille remplie, un pression sur 
<ENTER> et le programme passe à la suivante. 
C'est tellement évident que nous pourrons le 
confier à n'importe qui sans craindre une seule 
seconde qu'il ne se trompe. Formidable non ? 


PT Te EN PR BE LS TR NT En ITA D UT 7 
1 TABLEAU DES POURCENTAGES É 
l ! 
À CO QUEST,/REP, » EXCELLE TRES BO BON MOYEN MAUVAIS TRES MA NUL | 
DOPRESENTATION 23,08 20,51 17,95 12,82 2,56 12,82 2,56 | 
1 QUALITE 7,69 17,95 23,08 15,28 10,26 10,26 7,69 1 
D SERVICE 12,82 15,38 23,08 20,51 12,82 5,13 5,19 | 
} DELAI 2,56 7,69 17,95 39,43 23,08 7,69 2,56 | 
1 REGLEMENT s12 7,69 23,08 23,08 17,35 10,2% 5,13 1 
D MAINTENANCE 5,13 12,82 20,81 17,95 17,95 5,13 12,82 à 
à PACKAGE 10,26 20,51 15,3 17,95 10,26 10,26 5,13 ! 
1 PRIL S13 7,69 20,51 23,08 17,95 7,69 5,13 ! 
1 FIABILITE 10,26 12,82 20,51 17,95 15,28 7,69 5,12 à 
D CONCURRENCE 2,56 10,26 19,38 28,21 15,38 12,82 2,56 | 
Lassssessesresssssnses ss ses J 


AUTRES FONCTIONS 


000000000000 0000000000000000000000000 
Pour permettre des saisies journalières d'un ques- 
tionnaire qui n'en finit plus d'arriver (à l'ECHO on 
connaît...) le STAT'MAKER permet la sauvegarde 
de chaque grille dans l'état où elle se trouve. Le 
chargement, à son tour, la restituera intégralement 
et la saisie pourra recommencer. 

Il'est aussi possible de connaître l'avancement du 
questionnaire en sortant du mode "saisie" et, 
éventuellement, en demandant l'impression des 
résultats. Cette dernière reprend la disposition de 
la grille, imprime le nombre de réponses par case 
et en prime, refait le tableau avec les pourcen- 
tages par rapport au nombre de réponses faites. 


CAS PRATIQUE 


0000000000000000000000000000000000000 
Pour terminer sur du vécu, je vous révèlerai que 
l'ECHO a créé une grille pour chaque question du 
SONDAGE 88 (auquel vous pouvez encore 
répondre et pour cause...) et qu'elles sont toutes 
livrées grâcieuseument sur la disquette ECHO 
N°22. Que pouvais-je faire de mieux ? E 







Le programme 
STAT'MAKER 
et les fichiers 
QUEST1 à 
QUEST7 se 
trouvent 
sur la dis- 
quette ECHO 


ET STAT'MAKER * L'ECHO DU PCW N° 22 








LeREM°RRRRRRRRRRRRRRRRRÉER KR K 


2°REM°*eeSTAT'MAKER®VI.1eee* 

3°REM°* *PAR + : MARC + HERMION°* 

4°REM°* +POUR° L' ECHO +DU+PCW°* 

SeREM°* ee LOGI'STICKeBBeeee* 

G°REM°oRRRRRRRRRERRERERRERERR 

7! 

8e! DEPART 

ge! 

10+PRINTeCHRS (27) "E"CHR$ (27) "HVOULEZ-VOUS *CHARGEZ UN FICHIER 
+<0>/<N>+2" 1e (94) 

20AS=UPPERS (INKEYS) : IF °A$="O"eTHEN°K=76:GOTO+280°ELSE*IF+A$ 
OMN"eTHEN° 20" + (29) 

21e! 

22°! ENTREES *DU + TABLEAU 

23°! 

30 + INPUT ° "NOMBRE °DE °QUESTIONS"; À : IF +A>25 *0R°AC1 ° THEN + 30 + (FU 
| 

40 + INPUT ° "NOMBRE °DE REPONSES" ;B: IF-B>14°0R+B<1 *THEN° 40 ELSE + 
GOSUB* 340" + (0H) 
50+FOR°1=1*TO+A: PRINT "QUESTION"; 1; : INPUT QUESS (I) :NEXT:FEC= 
1'e(XQ) 
60+FOR*1=1°TO+B:PRINT + "REPONSE"; 1; : INPUT °REPS (1) :NEXT' (IF) 
61°! 

62e! INITIALISATION 

63°! 

10ESC$=CHRS (27) : CLS$=ESCS+"E"+ESC$+"H": DEF *FNLOCS (Y,X)=ESC$ 
"Y"4CHRS (32+Y) HCHR$ (32+X) :OPTION°NOT*TAB:WIDTH+255:T=INT (25 
JA) "+ (JU) 

net 

7241 AFFICHAGE * TABLEAU°GENERAL 

73°! 

80° IF °Q>1*THEN°FEC=FEC+1 :Q=0" + (77) 
90+PRINT*ESCS"O"CLSS"FICHE* : "FEC :FOR°1=1 °TO+B:PRINT*FNLOCS (2 
,16+((1-1)*INT(70/B)))LEFTS (REP$ (1), INT(70/B)-1) :NEXT' + (08) 
100+FOR*I=1 *TO*A:PRINTePNLOCS (3+I4T, 1) LEFTS (QUESS (1), 15) ; :FO 
ReJ=1eTO+B:A$(I,J)=0:PRINTeFNLOCS (3+1*T, 13+J*5)CUMS (I, J) ; :NE 
XT°J,l'+(L7) 

110 PRINT +FNLOCS$ (31, 10)" (A) JOUTER DES *DONNEES +-°CI>MPRIMER®L 
ES RESULTATS +-° QUITTER" ; SPACES (10) ;ESC$"H" :A$=INKEYS"  (B1) 
ile! 

112 +! eCONTROLES *1ER MENU 

113! 

120 +AS$=UPPERS (INKEYS) : IF °A$=""eTHEN° 120 + (MZ) 
130°1F°A$="Q" THEN PRINT +CLS$:END' + (F1) 
140+IF+A$="I"+THEN° 300" + (T1) 

150 +IF+A$C>"A"+THEN° 120! + (UJ) 

151°! 

152 +! *AFFICHAGE *TABLEAU°DE*SAISIE 

153°' 


160PRINTeFNLOCS (0, 0) "FICHE» :"FEC:FOR°I=1*TO+A:FOR°J=1*TO+B: 
Aÿ(I,J)=0:PRINTPNLOCS(3+I4T,13+J#5)" eee"; :NEXTeJ, I:PRINT 
+FNLOCS (31, 10) "<FLECHES> + e<0+0 + <0-0 +-° CRETURN> -° <S>AUV 
ER°-+<LDOADER°-+<EXIT>"; : A$=INKEYS:1=1:J=1" + (05) 
170°E=3+1*T:D=12#Jt5'e (TT) 

171°! 

172 +! +CONTROLES + 2EME *MENU 

173°° 

180 *A$=UPPERS (INKEYS) : IF °A$=""°THEN°PRINT-FNLOCS (E,D) “>":GOT 
0°180' + (UT) 

190 PRINTeFNLOCS (E, D)“+":K=ASC (AS) :IF°K=31*AND°1>1*THEN°1=1- 
1:GOT0+170" + (YL) 

200+1F°K=30 *AND+ICA°THEN°1=1+1 :GOTO* 170" + (L6) 

210+1F°K=1 + ANDeJ>1 *THEN°J=J-1 :GOTO +170" ° (JK) 

220 +IF °K=6 + AND + J<B+THEN°J=J+1 : GOTO +1 70" » (K3) 
230°IF°K=22*ANDeA$(1,J)=0°THEN°A#(1,J)=1:CUM$(1,J)=CUM#(I,J) 
#1:Q=0+1 : PRINT eFNLOCS (E, D+1) "X":GOTO +170! + (AJ) 
240+IF+K=28+ANDeA$(1,J)=1°THEN*AŸ(1,J)=0:CUM$(1,J)=CUM# (1,1) 
-1:Q-0-1:PRINT*FNLOC$(E,D+1)" ":GOTO+170" + (B1) 

250 +1F+K=13°THEN*FEC=FEC+1 :GOTO+ 160! + (HC) 
260+1FeK=27+THEN°B0! + (07) 
210+1F+K=83°THEN°PRINTeFNLOCS (30,10) "+"; : INPUT+"NOMeDU°FICHI 
ER°A+SAUVER*";FICS : ON°ERROR*GOTO + 360 : GOTO+ 350! + (LA) 
280+IF+K=76THEN°CLEAR: PRINT *CHRS (27) "Y"+CHRS (62) tCHR$ (42)"° 
“3; 2 INPUT + "NOMeDU°FICHIER +A+CHARGER"; FICS :ON + ERROR °GOTO + 360 : G 
OTO+370'+{LF) 

290 +GOTO+180" + (H9) 

291! 

292 e! e IMPRESSION *DES ° TABLEAUX 

293. 

300 + LPRINT : LPRINT : LPRINT °CHR$ (15) "NOMBRE +DE + FICHES *ETUDIEES + 
2"; FEC: LPRINT: LPRINT*"<eQUEST. /REP. °>+"; :FOR°1=1 *TO+B: LPRINT 
eUSINGe "ge + C3: REPS (1) ; :LPRINTe"+"; :NEXT' + (F4 

310 *LPRINT : FOR°1=1TO+A: LPRINTUSINGe"çe eee"; QUESS (1) 
; :FOR+J=1 TOeB: LPRINT USING "#######4";CUMS (1,9) ; :NEXT°J:LPR 
INT:NEXTel'e{11) 

320 + LPRINT : LPRINT +"TABLEAU*DES *POURCENTAGES +“: LPRINT : LPRINT + 
MCQUEST. /REP. 2e"; :FOR°1=1°TOeB: LPRINTUSINGe"ç® °°° ec"; REP$ 
(I); :LPRINTe"e";:NEXT' + (FS) 

330*LPRINT: FORe1=1 TO A: LPRINTeUSINGe"çe esse"; QUESS (1) 
;:FOReJ=1°TOeB: LPRINTeUSINGe"### EE. #4"; 100*CUM# (1, J) /FEC; :NE 
XT°J:LPRINT:NEXT I: LPRINT: LPRINT :GOTO+80' + (1B) 

331°' 

332»! »SOUS-PROGRAMME + DIMENS IONNEMENT + TABLEAUX 

333! 

340+DIMeA$ (A, B) ,CUM$ (A,B) ,QUES$ (A) , REPS (B) :RETURN' + (6P) 

341°' 

342 +! SAUVEGARDE DES + TABLEAUX 

343°! 

350*OPEN°"0",1,FICS:PRINTe#1,FEC,A,B:FOR°1=1 +TO+B:PRINTe#1,R 
EPS (I) :NEXT:FOR°1=1°TO+A:PRINTe#1,QUESS (1) :FOR°J=1*TO*B: PRIN 
ToH1, CUM$ (I, J) :NEXT eJ, 1: CLOSE: GOTO +80" + (2N) 

360 PRINTeFNLOCS (30, 10) SPACES (70) CHRS (7) ; :RESUME +160!» (AZ) 
361°' 

362 +! CHARGEMENT *DES TABLEAUX 

363° 
310*OPEN°"I",1,FIC$:INPUT-#1,FEC,A,B:GOSUB*340:FOR°1=1TO+B: 
INPUT°#1,REPS (1) :NEXT:FOR°1=1°T0eA: INPUT +#1,QUES$ (1) :FOR°J=1 
eTO+B: INPUT #1, CUM$ (1,J) :NEXTeJ, I :CLOSE: GOTO 70" + (JB) 
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Commentaires : L'ensemble est noté favorablement. La maquette est la plus 
contestée alors que le contenu se démarque d'une courte tête. 


Les thèmes que vous préféreriez voir traiter... 


GESTION/COMPTABILITE 6 JEUX 4 
SCIENTIFIQUE 5 COMMUNICATION 8 
TECHNIQUE/ PROGRAMMATION 1 D.A.O0 7 
EDUCATIF 3 PA.O 2 
ROBOTIQUE 9 DOMOTIQUE 10 


Commentaires : Si la programmation reste indéniablement victorieuse, 
l'éducatif fait un score incroyable pour se retrouver en troisième position! 


Décidez du sort des rubriques habituelles. 
INTERACTIF PETITES ANNONCES COURRIER 


ee RS ee ee 


A SUPPRIMER 8,70 580 0,00 
LA CONSERVER 66,67 52.17 403 
A AUGMENTER 10,14 3333 433 
[ AREDUIRE 435 290 125 


: Commentaires : P.A.et Interactif stables, Courrier en hausse! 


re 


| 5 
Bcééurs Qui ne fer s.<E 
savoir en 
Voulez-vous plus, moins ou autant de... 
PLUS PAREIL MOINS 
DBASE 21,74 42,03 24,64 
MULTIPLAN 43,48 26,09 18,84 
BASIC 46,38 2,90 
LOGO 27,54 39,13 17,39 
PASCAL 17,39 47,83 17,39 
ASSEMBLEUR 49,28 23,19 13,04 
TELEMATIQUE 14,49 42,03 
PROGRAMMES 23,19 1,45 
CONCOURS 21,74 39,13 20,29 
BANCS D'ESSAI 42,03 40,58 . 5,80 
INITIATION 4493 42,03 435 
EXCLUSIFS 37,68 44,93 435 
Commentaires : En soustrayant les moins au plus, il apparaît nettement que 
la demande de programmes est en tête suivie ensuite par les rubriques basic, 
initiations, exclusifs et bancs d'essai. Seule la télématique voit son pourcen- 
tage négatif nettement au dessus du positif alors que pour le reste la tendance 
est à la stabilité. 
Notez l'ECHO 
MAUVAIS MOYEN BON 
MAQUETTE ET PRESENTATION 7,35 25,00 61,76 
CONTENU REDACTIONNEL 2,94 14,71 71,94 
STYLE D'ENSEMBLE 2,94 22,06 70,59 
COUVERTURE 2,94 23,53 67,65 
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‘en com 
Sur tous les numéros que vous avez lus quel a été selon vous : 
Les meilleurs articles 


Initiation et Entrailles (DBASE II) 
Les Confidences de Locoscript, Initiation à CP/M 
Nous avons les moyens & le "spécial communication” (Echo 10) 


Les plus mauvais articles 


Banc d'essai ASTRO 
L'évasion télématique 


Utilisez- vous régulièrement des programmes donnés par l'ECHO ? 


OUI 12,50 NON 27,50 


I 

I 

I 

I 

I 

I 

I 

I 

I 

; Les reportages et interviews (en général) 

I 

I 

I 

I 

I 

I 

L Si oui, lesquels : ATHEMYS, PRINTER MAKER, ETIC FACILE, PERT, 
MONITEUR DE DISQUETTES & LES JEUX sont les plus cités. 
E Avez-vous d'autres ordinateurs ? 


OUI 49,20 NON 50,80 
Si oui, lesquels : 


Macintosh: 9,10 


AtnñiST:6,60 Thomson : 7,35 Amiga : 4,30 MSX : 3,30 


I 

I 

I 

( 

PC: 20,35 CPC:20,50  Pockets: 18,50 
l 

Vos plus gros reproches à l'ECHO DU PCW : Sa régularité de sortie, l'or- 
Û profanes, son prix et son humour! 


Vos plus grands compliments à l'ECHO DU PCW : Sa polyvalence, le 
sérieux des articles et son humour! 


Vos suggestions : Baisser le prix de l'Echo, le publier toutes les semaines, 


programmes, et d'une manière général en donner plus pour moins cher! 
En condlusion (provisoire) : Le succès de ce sondage confimme que le PCW 
se porte bien et plus de 50% d'entre-vous n'ont nul envie de lui être infidèle. 


faut aussi avouer que deux tendances se dégagent nettement quant au niveau 
de compréhension : d'une part les néophites perdus et d'autre pan, les bran- 
chés callés. Il va falloir repenser à la cohabitation des deux groupes en espé- 


des scores remarquables qui confinment que le PCW n'est pas coincé dans un 


est de 38 ans d'après nos statistiques. Continuez à nous transmettre vos son- 
dages jusqu'au 30 Septembre et merci de votre attention. 
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thographe, le manque de clareté dans la maquette, pas assez d'articles pour les 


plus d'anticles pour les profanes, regrouper toutes les pubs en premières pages, 
faire moins d'auto-satisfaction et plus d'assembleur (!), faire des hors-séries de 


munication et moins de télématique!) n'est pas simple à prendre en compte. Il 


rant que chacun tolèrera l'autre! Certaines rubriques comme l'éducatif ont fait 


bureau mais conceme aussi les enfants des utilisateurs dont la moyenne d'age 
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Nos péripéties mensuelles, parmi l'élite de l'informa- 
tique, nous ont permis de découvrir PASCAL, un nou- 
veau compagnon à l'aise dans tous les salons et bour- 
ré de qualités. Non content d'être très logique, clair, 
efficace, riche et puissant, il est en plus extrêmement 
obéissant à qui sait s'attacher ses faveurs. Pour cela, 
j'ose le dire crûment, il n'est ni besoin de charme, ni 
d'artifice quelconque, ni même de pression ou autre 
chantage. Non, PASCAL obéit à qui lui donne des 
instructions qu'il comprend. Simples ou structurées, 
ces instructions sont justement dévoilées dans les 
lignes qui suivent... 





E) EVALUATION D'UNE EXPRESSION 


Puisqu'il est bon de situer "géographiquement" les 
choses dont on parle, je m'en vais vous décrire les 
endroits où l'on a de grandes chances de rencontrer les 
instructions dans un programme PASCAL. D'une 
manière générale, on trouve les instructions entre 
BEGIN et END, c'est-à-dire les zones instruction des 


procédures fonctions mais aussi, celles du bloc principal 


(Cf. L'ECHO DU PCW n°19). 
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PASCAL doit pouvoir s'adapter à toutes les situa- 
tions, ce qui implique de nombreuses instructions 
simples ou structurées, ces dernières regroupant des ins- 
tructions composées, conditionnelles et répétitives. 
Précisons que la complexité des programmes (donc des 
algorithmes) va souvent nous obliger à imbriquer des 
instructions et à manipuler des expressions qu'il faudra 
évaluer. 

Tout un programme, n'est-ce pas ? 





On en dénombre quatre : l'assignation, le débranche- 
ment, les procédures, l'instruction vide. 


1) L'assignation ( := 


Cette instruction est très importante : elle spécifie 
que la valeur calculée à droite de l'opérateur ":=" doit 
être affectée à la variable à sa gauche. 

Plus concrètement, "N:=150" se lit "N prend la 
valeur 150”. 

Attention, en PASCAL il faut différencier ":=" de 
"=", Le premier signe est l'assignation, le second est 
l'opérateur d'égalité. Ainsi "N=150" est une expression 
booléenne (logique) qui vaut TRUE (vrai) si la valeur 
de N est 150, FALSE (faux) sinon. 


2) Le débranchement (GOTO) 


Comme la majorité des langages informatiques, 
PASCAL est séquentiel, c'est-à-dire que les instructions 
sont exécutées les unes après les autres. Mais nous 
avons la possibilité de rompre cet enchaînement, c'est ce 
qu'on appelle un débranchement. 

Sa syntaxe est: GOTO <identificateur de ligne> 
L'identificateur de ligne (ou label) est le repère indi- 
quant à quel endroit il faut reprendre l'exécution. 

Avant même de placer le label dans votre program- 
me n'oubliez pas qu'il faut le déclarer, ce qui se fait dans 
la zone de déclaration d'identificateurs de lignes intro- 
duite par le mot clé LABEL. Dans le PASCAL stan- 
dard, les labels sont des nombres entiers non signés d'au 
plus quatre chiffres suivis du signe ":". TURBO PAS- 
CAL accepte, de plus, que les labels soient des identifi- 
cateurs de même nature que ceux que l'on trouve pour 








les types, les variables, les procédures (etc.), donc qu'ils 
possèdent des caractères alphanumériques. 

La figure 1 vous présente un exemple d'emploi de 
GOTO, mais je vous déconseille l'emploi de cette ins- 
truction qui favorise l'anarchie dans un programme. 

En PASCAL standard, la portée d'une étiquette est 
le bloc dans lequel elle est déclarée : un GOTO situé 
dans le bloc principal ne peut pointer que sur une éti- 
quette située dans ce même bloc ; de même, on ne peut 
sauter hors de la zone instruction d'une procédure ou 
d'une fonction. 


er 

| URES 

Program Exemple Goto; (* Utilisation de GOTO en PASCAL *) 

1 

1 Label 

| 90, 100, FIN; (* Déclaration des Identificateurs de ligne *) 

| (* Seul TURBO PASCAL supporte les identificateurs *) 

É (* alphanumériques, comme FIN #) 

L BEGIN 

! WriteLn('Début du programme: "}; 

1  Goto 100; {(* Saut à l'identificateur 100 *) 

| 90: {* Position de l'identificateur 90 *) 

1 Writeln(! - Ligne 90 -'); 

{ Goto FIN; (* Saut à la fin du programme * 

| 100: {* Position de l'identificateur 100 *) 

! Writeln(' - Ligne 100 -'); 

1  Goto 90; {* Saut à l'identificateur90 +) 

! FIN: {* Position de l'identificateur FIN +) 

; Writeln('Fin du programe") 

EN. 

Lisécoscsescssscessssesusssasiesssseschosss 
3) Les procédures 


Vous le savez, une procédure est une sorte de sous- 
programme qui peut effectuer certaines actions ou enco- 
re manipuler des valeurs. On en rencontre deux sortes : 
les premières sont prédéfinies, c'est-à-dire que PAS- 
CAL les connaît déjà car elles forment son vocabulaire 
de base. D'autres sont dites utilisateurs : l'utilisateur doit 
les déclarer et les définir afin d'enrichir le vocabulaire 
mis à sa disposition. 

Le nom de la procédure devient, dès qu'elle est 
déclarée, un mot du langage et sa simple mention suffit 
à lancer son exécution. 

Les lecteurs réguliers de cette série (qu'ils soient 
bénis) ont déjà manipulé des procédures prédéfinies 
telles que WRITELN ou encore READLN, aussi je 
n'insiste pas. 


4) L'instruction vide (ou nulle) 


Il peut arriver que dans certaines conditions votre 
programme ne doive rien faire, par exemple en atten- 
dant la frappe d'une touche. L'instruction vide sert à dire 
à PASCAL qu'il doit rester inactif momentanément, des 
"vacances" en quelque sorte. 

L'instruction nulle ne contient aucun symbole ou 
plutôt, elle est l'absence de toute instruction. Elle peut 
être utilisée chaque fois que la syntaxe de PASCAL 
nécessite une instruction et qu'il n'y a aucune action à 
exécuter (Cf exemple de REPEAT UNTIL). 
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B) LES INSTRUCTIONS 
CONDITIONNELLES 






Sous-ensemble des instructions structurées, les 
instructions conditionnelles peuvent être de deux types : 
IF THEN ELSE ou CASE OF ELSE. 

Comme leur nom l'indique, elles permettent d'orienter 
l'exécution du programme vers certaines instructions si 
une condition est/ou n'est pas remplie. 


1) IF THEN ELSE ou Si Alors Sinon (figure 2) 


Instruction très utilisée en informatique, sa syntaxe 
simple : 
IF <Expression logique> THEN <lnstruction 1> 
ELSE <Instruction 2> 
L'expression logique (booléenne) est la condition 


qui va décider de la suite à donner à l'exécution du pro- 
gramme : si cette expression vaut TRUE alors on exé- 
cute l'instruction 1, sinon, si l'expression vaut FALSE, 
on exécute l'instruction 2. La présence du ELSE n'est 
pas toujours nécessaire, de même qu'on peut très bien 
ne vouloir traiter que le cas où l'expression est fausse. 
Nous pouvons donc utiliser des variantes de la forme : 


IF <Expression logique> THEN <Instruction> 
ou encore 


IF <Expression logique> THEN ELSE <Instruction> 


Enfin n'oubliez pas qu'il ne faut pas de point virgule "; 


(utilisation de l'instruction vide derrière le THEN) 


devant le ELSE. 


Program Exemple IF; 


Var 


Reponse : 


BEGIN 


Char; 


Write ('Programmez-vous en PASCAL (O/N) ? ‘}; 
ReadLn (Reponse); (* Saisie de la réponse au clavier *) 


Reponse :=UpCase (Reponse) ; 


(* REPONSE est mis en majuscule +) 


If Reponse='0! then 
WriteLn('Mes plus sincères félicitations!'}) 
Else 


WriteLn('Dépéchez-vous de relire les ECHOS DU PCW et au boulot !'} 


2) CASE OF ELSE ou Cas Sinon (figure 3) 


Cette intruction peut être considérée comme une 


généralisation du IF. Pour résoudre un problème quel- 
conque une analyse de cas particuliers peut être envisa- 
gée. En fonction de la valeur d'une variable ou d'une 
expression, on est amené à aiguiller l'exécution du pro- 
gramme vers telle ou telle action au moyen de l'instruc- 
tion CASE. Cette valeur qui détermine la suite du pro- 
gramme est appelée sélecteur ou cas. 


Syntaxe : CASE <Expression> OF 
<liste d'étiquettes de CASE> : <Instruction> ; 
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{* Utilisation de IF THEN ELSE en PASCAL *) 
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<liste d'étiquettes de CASE> : <Instruction> 
ELSE <Instruction> 
END 


Program Exemple CASE; (* Utilisation de CASE OF ELSE en PASCAL *) 


Var 
Mois : Integer; 


BEGIN 
Write ("Donnez le chiffre du mois courant: ‘); 
Readln (Mois) ; 
Writeln; 
{* Utilisation de listes mono-cas *) 
{(* Affichage d'un des 12 mois en fonction de la valeur de Mois #) 
Case Mois Of 
1 : WriteLn('Mois de Janvier'); 
: Writeln('Mois de Février’); 
: Writeln('Mois de Mars'); 
: Writeln('Mois d''Avril'); 
: Writeln('Mois de Mai'); 
: Writeln('Mois de Juin'); 
: Writeln('Mois de Juillet'); 
: Writeln(‘Mois d''Aout!); 
9 : Writeln('Mois de Septembre"); 
10 : WriteLn('Mois d''Octobre'); 
11 : Writeln('Mois de Novembre! ); 
12 : Writeln('Mois de Décembre!) 


æ — oo Eu = © ND 


Else (* Si Mois n'est pas compris entre 1 et 12 *) 
Writeln('Une année se compose de 12 mois et non pas de ‘,Mois) 
"End; 


(* Utilisation de listes de plusieurs cas *) 
{* Affichage d'une des saisons en fonction de la valeur de Mois +) 
Case Mois Of 
12, 1, 2: Writeln('C''est l''hiver'); 
3, 4, 5: Writeln('C''est le printemps"); 
6, 1, 8 : Writeln('C''est l''été'); 
9, 10, 11 : Writeln('C''est l''autome') 


{* Utilisation de listes d'intervalles; possible seulement sur TURBO PASCAL *) 
(* Affichage du numéro de semestre en fonction de la valeur de Mois #) 
Case Mois of 
1..6 : Writeln('Premier Semestre); 
7..12 : WriteLn('Deuxième semestre’) 
End 
(* Il est possible de mixer cas et intervalles *) 


END. 


Lomme) 


L'expression, qui contient généralement au moins 
une variable, est évaluée et sert de sélecteur. la <liste 
d'étiquettes de CASE> est une liste de constantes du r 
même type scalaire que le sélecteur. C 
Une fois le sélecteur évalué, on le compare aux élé- 
ments des différentes listes et on exécute l'instruction ! 
correspondant à la liste qui contient une constante égale  ! 
au sélecteur. i 
La clause END doit toujours terminer un CASE, ! 
elle indique que la comparaison du sélecteur avec les ! 
différentes listes est terminée. ! 
| 
! 
! 
! 
! 
! 
! 
! 
(l 
! 
! 
L 


Quelques remarques : 
- dans les implémentations récentes de PASCAL, on 


peut rajouter la clause ELSE (parfois OTHERWISE). 
Si le sélecteur est un cas qui n'a pas été prévu, alors 
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l'instruction qui suit le ELSE est exécutée. 

- une liste d'étiquettes peut ne contenir qu'une seule 
constante. 

- TURBO PASCAL permet aussi de traiter des 
intervalles de valeurs. 





C) LES INSTRUCTIONS REPETITIVES 


L'homme, contrairement à l'ordinateur, se fatigue 
assez vite dès qu'il s'agit d'effectuer des tâches répéti- 
tives et ardues. 

PASCAL n'est pas en reste puisqu'il met à notre dis- 
position trois instructions structurées capables de gérer 
ce que l'on nomme une "boucle", mais dans des condi- 
tions différentes. il s'agit de FOR DO, REPEAT 
UNTIL et WHILE. 


1) FOR DO (figure 4) 


La structure FOR DO indique qu'une instruction 
doit être exécutée répétitivement, pendant qu'une 
variable progresse pas à pas entre deux bornes calculées 
au préalable. Le nombre de répétitions est donc connu. 
Deux syntaxes sont possibles : 

- pour une valeur initiale inférieure ou égale à la valeur 
finale on a : 

FOR <Variable de contrôle> := <Valeur initiale> 

TO <Valeur Finale> 
DO <iInstruction> 
- pour une valeur initiale supérieure ou égale à la valeur 
finale on a : 

FOR <Variable de contrôle> := <Valeur initiale> 

DOWNTO <Valeur Finale> 
DO <instruction> 

La variable de contrôle croît d'une unité si on utilise 
TO (décroît d'une unité si on utilise DOWNTO) selon 
les valeurs de son type. Les valeurs initiales et finales 
ne sont évaluées qu'une seule fois lorsqu'on rencontre 
l'instruction FOR et sont du même type scalaire que la 
variable de contrôle. 


Si la valeur initiale est supérieure dans le cas de TO 
(ou inférieure dans le cas de DOWNTO) à la valeur 
finale, l'instruction qui suit DO n'est pas exécutée. 

Il ne faut pas modifier la valeur de la variable de 
contrôle d'une structure FOR quand celle-ci est exécu- 
tée, sous peine de perturber dangereusement votre pro- 
gramme. 


e 
EIGURE 4 
1 

Program Exemple For; (* Utilisation de FOR DO ! 
en PASCAL *) . 
0 

(* Affichage du jeu de caractères du PCW *) L 
(* Codes allant de 32 à 255 *) É 
i 

Var ! 
Caractere : Char; ! 

1 

BEGIN d 
For Caractere:=#32 to #255 Do | 
Write (Caractere,' ‘) | 
END. 1 
sSssis oc esssensmrssesesséess osseuse J 








2) REPEAT UNTIL ou Répète Jusqu'à (figure 5) 


Cette fois-ci le nombre de répétitions n'est pas 
connu. Voyons tout de suite la syntaxe : 
REPEAT <Suite d'Instructions> UNTIL 
<Expression Logique> 
La liste d'instructions comprise entre les mots réser- 
vés REPEAT et UNTIL est exécutée au moins une 
fois. La répétition éventuelle de cette exécution est sou- 
mise à la valeur de l'expression logique (booléen) qui 
suit UNTIL, celle-ci étant évaluée à chaque tour : si 
cette expression vaut TRUE on continue l'exécution 
normale, sinon l'exécution reprend au REPEAT corres- 
pondant. 
Attention : il faut veiller à ce que l'expression 
logique puisse devenir vraie car, dans le cas contraire, 
on a une boucle sans fin. 


Program Exemple Repeat; (* Utilisation de REPEAT en PASCAL *) 
{* avec imbrication de IF +) 


(* Ce programe est le jeu du Nombre Secret. 
Il vous faut découvrir un nombre choisi au hasard 
compris entre 0 et 99. x) 


(* Variables utilisées: 3 nombres entiers *) 


Var 
Nombre Secret, 
Choix, 
Nombre Essai 


(* Contient le nombre à découvrir *) 


: Integer: (* Contient le nombre de tentatives *) 
BEGIN 
(* Initialisations *) 

Nombre Essai :=0; 


{(* D{but du jeu #) 

Writeln (‘Trouvez un nombre compris entre 0 et 99:'); 

Repeat {(* Début de la boucle Repeat Until *) 
{* Nombre Essai est augnenté d''une unité à chaque tour #) 
Nombre Essai :=Nanbre Essait]l; 

Writeln; 
Write ("Quel est votre choix ? '); 
ReadLn (Choix) ; 
If Choix < Nombre Secret then 
WriteLn('* Trop petit ! *!) 
Else 
If Choix > Nombre Secret then 
WriteLn('* Trop grand ! *!) 

Until Choix = Nombre Secret; 

Writeln; 

Writeln('Vous avez gagné en ‘Nombre Essai, coups.’) 

END. 


3) WHILE DO ou Tant Que Faire 


Là encore le nombre de répétitions n'est pas détermi- 
nable : 

WHILE <Expression Logique> DO <Instruction> 

REPEAT et WHILE sont quasiment identiques, 
mais ici l'instruction sera exécutée tant que l'expression 
logique vaudra TRUE, ce qui peut très bien ne jamais 
arriver (vous trouverez un exemple d'emploi de 
WHILE dans la figure 6). 


{* Contient le nombre choisi par le joueur t) 


r 
l 
l 
l 
l 
I 
! 
I 
I 
i 
! 
1 
l 
1 
I 
I 
l 
1 
1 
1 
! 
1 
l 
l 
1 
1 
1 
l 
! 
! 
l 
l 
l 
l 
Û 
| Nombre Secret :=Random (100) ; (* Fonction renvoyant un nambre entre 0 et 99 *) 
l 
1 
1 
! 
l 
1 
1 
! 
l 
l 
! 
l 
l 
l 
l 
! 
1 
1 
1 
l 
! 
! 
1 
1 
l 
l 
l 
l 
l 
l 
l 
1 
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D) IMBRICATION DES INSTRUCTIONS 


Les instructions structurées IF, CASE, REPEAT, 
WHILE, conditionnent l'exécution d'autres instructions, 
ces dernières faisant partie intégrante de l'instruction 
structurée : les instructions sont donc imbriquées. 
Reprenons, pour exemple, l'instruction structurée condi- 
tionnelle IF dont la syntaxe est rapellée ci-dessous : 

IF <Expression logique> THEN <Instruction 1> 

ELSE <lnstruction 2> 

L'instruction 1 est exécutée si l'expression logique 
vaut TRUE, sinon l'instruction 2 est activée; les instruc- 
tions 1 et 2 sont des instructions à part entière mais elles 
font aussi partie de l'instruction conditionnelle IF. 

Ceci nous amène à une définition très "pascalienne" 
de l'instruction : en Pascal, une instruction est une 
action de base (instruction simple) ou une imbrication 

d'instructions (instructions structurées + ins- 
7 truction simples). 


! 
! 
! 
É Mais tout n'est pas dit : supposez qu'après 
1 le THEN ou le ELSE vous vouliez exécuter, 
!_ non pas une, mais plusieurs actions : 
{ SIN>150 ALORS afficher valeur de N, 
1 rendre A égal à N, ajouter 2 à N 
4 Pascal a la possibilité de les regrouper en un 
!_ bloc qui sera traité comme une instruction 
! unique, on parle d'instruction composée. 
| Celle-ci regroupe tous les éléments qui la 
} compose entre un BEGIN et un END. Pour 
| notre cas, On aura donc : 
| If N>150 then 
; Begin 
i Writeln('Valeur de N ',N); 
i A:=N; 
| N:=N+2 
| End 
! N'oubliez pas que partout où l'on peut mettre 
!_une instruction, On peut aussi utiliser une ins- 
!_truction composée. : 
i 
! 
1 
! 
! 
Q 
! 
1 
0 
0 
t 
Q 
(] 
! 
! 
! 
1 
(] 
(l 
1 
! 
0 
l 
0 
l 
Q] 
J 


Attention! 

L'imbrication de plusieurs IF THEN ELSE 
est assez délicate à manipuler car il n'est pas 
toujours évident d'attribuer le ELSE à un IF 
précis (cf. figure 5). Retenez que la clause 
ELSE se rapporte au IF le plus proche sans 
clause ELSE. 


E) EVALUATION D'UNE EXPRESSION 


Les expressions sont des phrases qui 
décrivent les traitements à effectuer sur leurs 
opérandes : constantes, variables et fonctions. 
Ces traitements sont spécifiés à l'aide d'opérateurs. 

On trouve des expressions de quatre natures. Les 
plus fréquentes sont les expressions arithmétiques et 
logiques. Le PASCAL standard permet aussi des 
expressions sur les types SET (ensembles) et beaucoup 
de versions récentes de PASCAL acceptent des expres- 
sions traitant des chaînes de caractères. Pour aujourd'hui 
nous nous contenterons d'aborder les deux premiers 
types d'expressions. 

En fonction de leur nature on trouve les expressions 
dans les instructions d'affectation (:=) ainsi qu'à chaque 
endroit où des valeurs sont comparées. 
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* 


… 


Var 


{* Cette 


Function 


Begin 
MAN :- 
M :- 
AP :- 
JS := 


JS := 


Else 


[>] 
=] 
e 


(* Début 


Begin 


Begin 


End 


sk S 
$ 


6 pour SAMEDI 
7 pour DIMANCHE 


Reponse 
Jour, Mois, An 


Program Jour De La Semaine; 


Ce programme se charge de vous donner le jour de la semaine 
correspondant à une date précise. Chaque jour est codé sous 
la forme d'un chiffre comme suit : 


: Char; 
: Real; 


fonction renvoie le chiffre du jour de la 


semaine dont la date est passée en paramètre.  *) 


Numero Jour (J,M,A:Real) : Real; 


Var JS, MAN, MP, AP : Real; 


INT (0.6+1/M+0.01); 

M+12*MAN: 

A-MAN; 

J + INT((367 * (MP - 1) + 5) / 12 + 0.001) 

+ INT (365.25 * (AP + 4712) + 0.001) 

- INT (AP / 100) + INT (AP / 400) ; 

INT( 7 * FRAC((JS - 1720977.0) / 7) + 0.001); 


If JS-0 then 
Nunero Jour:=7 


Numero Jour :=JS 


du programme *) 


Writeln; 

Writebn('-=- CALENDRIER -=-!); 
Reponse :="'0"; 

While Reponse='0! Do 


Writeln; 

Write(! Jour : ‘}; ReadIn(Jour}); (* ex. 31 *) 
Write(' Mois : ‘); Readln(Mois); (* ex. 
Write(' Annfe : '); Readln (An); 
WriteLn:; 

Writeln('Lundi=1l, Mardi=2, Mercredi=3, Jeudi-4, Vendredi=5, etc.'); 
WriteLn('Le jour de la semaine correspondant est <'!, 


124} 
(* ex. 1988 *) 


Nunero Jour (Jour, Mois, An) :0:0,' >'); 


WritelLn; 
Write('Voulez-vous continuer (0/N) ? ‘); Readln (Reponse); 
Reponse :=UpCase (Reponse) ; 


(* While Reponse='0! +) 


1) Les expressions arithmétiques 


Une expression arithmétique est la combinaison de 
deux ou plusieurs opérandes entier (INTEGER), réels 
(REAL) et aussi octets (BYTE) en TURBO PASCAL, 
ceux-ci sont séparés par les opérateurs décrits ci-après. 
L'évaluation de l'expression suit un ordre prioritaire 
aussi appelé ordre de précédence. 


Lonmmemmnmonmemmmmmmmmmmmmmmmmmmmnmmmmmmnmmenmmmmnmmmenesmemmensmmmmmenememmmm…= 


- le moins unaire ex. -5 , -(13+6) 

- l'opérateur NOT propre à TURBO PASCAL (il ne 
fonctionne que sur les entiers et inverse chaque bit de 
l'opérande) ex. NOT 0 = -1 

- les opérateurs multiplicatifs: * (multiplication), / 
(division), DIV (division entière), MOD (reste de la 
division entière) auxquels TURBO PASCAL ajoute 
AND (et arithmétique), SHL (décalage à droite), SHR 
(décalage à droite) qui ne s'appliquent qu'aux entiers et 
sont d'un usage trés spécial. 

- les opérateurs additifs : + (addition), - (soustrac- 
tion), là aussi TURBO PASCAL ajoute d'autres opé- 
randes soumis aux mêmes contraintes que précédem- 
ment, OR (ou arithmétique), XOR (ou exclusif arithmé- 
tique) 

- à priorité égale, les opérateurs sont évalués de 
gauche à droite. 


2) les expressions logiques 


Une expression logique (booléenne) est soit une 
combinaison d'opérandes logiques, soit une expression 
relationnelle, soit une combinaison des deux. Nous 
connaissons déjà les opérateurs logiques NOT, AND, 
OR, XOR, ainsi que les opérateurs de comparaison = 
(égal), <> (différent), > (supérieur), >= (supérieur ou 
égal), < (inférieur), <= (inférieur ou égal) qui mettent en 
relation deux valeurs de même type. 

L'ordre de précédence ici est : 

- l'opérateur NOT 

- l'opérateur AND 

- les opérateurs OR, XOR 

- les opérateurs de comparaison =, <>, <, <=, >, >= 


Bien entendu, une expression entre parenthèses est 
évaluée indépendamment des opérateurs qui l'entourent. 
Rappelons que si les opérandes peuvent être des 
constantes, des variables ou des fonctions prédéfinies, 
l'utilisateur a aussi la possibilité de définir ses propres 
fonctions. 

Le programme de la figure 6 manipule de nom- 
breuses expressions, un type déclaré (JourSemaine), 
une fonction (Valeur Jour) et des instructions afin de 
pouvoir déterminer, à partir d'une date quelconque, le 
jour de la semaine correspondant. La fonction est aisé- 
ment modifiable et réutilisable. 


Ancien débutant en PASCAL, je me permets de 
donner quelques conseils aux novices de plus en plus 
nombreux. Si la "théorie verbeuse" ci-dessus ne répond 
pas entièrement à vos interrogations alors lancez-vous! 
Tapez les lignes de programmes PASCAL que vous 
glanez dans l'ECHO ou même ailleurs (gare aux infidé- 
lités !!!). Testez des instructions, programmez et lisez 
quelques bons livres sur le sujet. La bibliothèque trai- 
tant de PASCAL est extrêmement riche et de celle-ci, 
nous reparlerons très bientôt. L. 






Les programmes de cet 
article se trouvent sur la 
disquette ECHO N°22 
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FORMATION CONTINUE 


ALTITUDE XXI organise des sémi- 
naires de formation pour tous les re- 
sponsables micro-informatiques, utilisa- 
teurs ou jeunes en micro-informatique 
sur PCW ou sur PC. 


e système d’exploitation CP-M +: 
jectifs: acquérir une maîtrise de 


l'environnement CP-M sur PCW, 
connaître la plupart des commandes 
système du PCW permettant une meil- 
leure utilisation des ressources maté- 
rielles et logicielles. 

(1 journée, 950.00 FHT) 


dates: 22-07-88 et 12-09-88 


Mirrise de LOCOSCRIPT 1:(PCW 
8512 et 8256) 

Objectifs: maîtriser le traitement de 
texte avec l’ensemble des possibilités du 
logiciel, acquérir de solides connais- 
‘sances dans le traitement de documents 
sur PCW. 

(2 jours, 850.00 FHT-jour) 


dates: 18&19-07-88, 22&23-08-88 et 
13& 14-09-88 


LOGIGXS 


Les clés de l'efficacité 


Mise de LOCOSCRIPT 2:(PCW | L: programmation en PASCAL sur 
PCW. 


9512) 

Objectifs: maîtriser le traitement de 
texte avec l’ensemble des possibilités du 
logiciel avec la gestion de mailing, ac- 
quérir de solides connaissances dans le 
traitement de documents sur PCW 
9512. 

(2 jours, 850.00 FHT-jour) 


dates: 26427-07-88, 29&30-08-88 et 
21422-09-88 


Perfectionnement à LOCOSCRIPT 
et maîtrise de LOCOMAIL.: 

Objectifs: utiliser parfaitement toute la 

puissance de LOCOSCRIPT 2 avec 

LOCOMAIL. Programmation de docu- 

ments types avec calculs, gestion opti- 

misée de mise en place de documents... 
(1 jour, 950.00 FHT) 

dates: 

PCW 8256-8512: 28-07-88 et 29-09-88 

PCW 9512: 29-07-88 et 30-09-88 


L. gestionnaire DBASE IT 

Objectifs: acquérir l’ensemble des no- 
tions permettant une mise en place de 
base de données sur le PCW avec le lo- 
giciel DBASE II. Introduction à la pro- 
grammation structurée et aux outils d’a- 
nalyse. 

(2 jours, 950.09FHT-jour) 


dates: 18& 19-07-88 et 26&27-09-88 





Qbjectifs: maîtrise du langage PAS- 
CAL avec syntaxe, commandes, struc- 
tures. Méthodes de programmation 
structurée. Mise en place d’un gestion- 
naire évolué sur PCW. 

(4 jours, 850.00 FHT-jour) 


dates: dit 29-08-S8 au 01-09-88. 


TAGE JUNIOR PCW. 
ifs: au sein d’un atelier de 8 


jeunes au maximum avec un animateur 
dynamique, donner aux jeunes les élé- 
ments pour découvrir le PCW avec un 
regard pas seulement ludique. Initiation 
au PCW. Un cours de professionnels 
réserve pour les jeunes de 8 à 16 ans. 
(par après midi de 4 heures, 500 FHT) 


dates: régulièrement les samedis après- 
Ftidl 


ALTITUDE XXI organise également 
des séminaires. de formation sur maté- 
riel PC sur l’ensemble, des logiciels 
standards, langages ou méthodes. 


RENSEIGNEMENTS: 
Anne Marie MALLET 


au 43 56 05 50. 
Altitude-XXI, BP 255, 75624 Paris Cedex 11. 


XX XX XX x 


Avec une gamme de 


produits fiables et 


renommés, LOGICYS est 


la solution à vos 


ALIENOR Comptabilité générale ..... 890*F HT 
CRESUS Pal era seine 990 FHT 
TALOS Devis / Situation ........ 1680 FHT 
DAMOCLES Facturation / stocks ..... 1480*H HT 


problèmes de gestion. 


Grâce à des milliers de 


programmes diffusés, 


vous alliez sécurité 


et efficacité. 


* Fonctionne également sur 9512 


Pour recevoir une documentation sur 
l'ensemble des produits LOGICYS, 
veuillez retourner le bon ci-joint. 








Votre courrier suscite un grand intérêt 
auprès des fidèles de notre Echo et je m'em- 
ploierai à sélectionner les meilleurs trucs, non 
sans les avoir préalablement testés dans la mesu- 
re de mes possibilités. Toujours est-il que notre 
courrier du mois dernier me vaut un premier coup 
de badine et c'est d'une voix emplie de honte que 
je vous encourage à lire l'interactif de ce mois 
pour y découvrir mes forfaits et surtout comment 
les corriger. Je compte sur votre compréhension et 
vous encourage plus que jamais à me transmettre 
vos découvertes. Vous constaterez dans les lignes 
qui vont suivre que l'expérience de chacun com- 
blera les nombreuses ornières laissées par le tank 
fonceur de la micro-informatique... Enfin dernier 
point notoire, j'ai demandé à ce que les pro- 
grammes publiés dans le courrier soient mis sur la 
disquette Echo du mois afin d'économiser 
quelques précieuses minutes aux nombreux lec- 
teurs qui en font l'acquisition. Bon courrier. 


Votre dévoué, Albert DUROUX 


XAVIER OLIVIE 


Etant un peu déçu par les possibilités pour tracer 
des cadres sous DBASE et n'étant pas un incondi- 
tionnel de l'utilitaire ZIP.COM livré avec la dis- 
quette, j'ai programmé deux petits modules que 
vous trouverez plus bas. 

Le premier, CADRE.CMD permet de tracer un 
cadre à la dimension voulue à la place que l'on 
désire sur l'écran. Ce module peut être inséré dans 
n'importe quel programme écrit sous DBASE à la 
seule condition que les coordonnées du cadre (coin 
supérieur gauche, largeur et hauteur) soient pas- 
sées par les variables ORG1, ORG2, LONG et 


a ———— 


* 
* 
STORE 0 TO CP1 

STORE 0 TO CP2 

à ORG1,0ORG2 SAY CHR(134) 

à ORG1,O0RG2+LONG SAY CHR(140) 

à ORG1+HAUT,ORG2 SAY CHR(131) 

à ORG1+HAUT,ORG2+LONG SAY CHR(137) 

DO WHILE CP1<LONG-1 

fie CP1+1 TO CPI 

| 

A 

Î 


nm 


à ORG1,ORG2+CP1 SAY CHR(138) 

à ORGL+HAUT,ORG2+CP1 SAY CHR(138) 
ENDDO 

DO WHILE CP2<HAUT-1 

STORE CP2+1 TO CP2 

à ORG1+CP2,0RG2 SAY CHR(133) 

à ORG1+CP2,0RG2+LONG SAY CHR(133) 
Î ENDDO 
un 








* CADREVID.CMD 


* 
STORE 0 TO CP1 

STORE ” ” TO CAR 

DO WHILE CP1<LONG-2 
STORE CP1+1 TO CP1 
STORE CAR+" " TO CAR 


} 
ENDDO | 
| STORE 0 TO CP2 | 
DO WHILE CP2<HAUT-1 | 
STORE CP2+1 TO CP2 
à ORG1+CP2,0RG2+1 SAY CAR 
ENDDO 
Ris 
} 


* 


SET TALK OFF 

ERASE 

à 1,1 SAY "LIGNE ?" 
INPUT TO ORG1 

à 3,1 SAY "COLONNE ?" 
INPUT TO ORG2 

à 5,1 SAY "LONGUEUR DE LA FENETRE ?" 
INPUT TO LONG 

à 7,1 SAY "HAUTEUR DE LA FENETRE ?" 
INPUT TO HAUT 

STORE 0 TO A 

DO WHILE A<22 

STORE 0 TO B 

DO WHILE B<80 

à A,B SAY "." 

STORE B+1 TO B 

ENDDO 

STORE A+1l TO À 

ENDDO 

DO CADRE 

DO CADREVID 

SET TALK ON 

RETURN 





HAUT. 

Le second, CADREVIT.CMD, efface complète- 
ment le contenu de la fenêtre précédemment créée. 
Le troisième module, ESSAI.CMD est un pro- 
gramme d'exemple qui demande les coordonnées 
du cadre avant de remplir (lentement) l'écran de 
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points pour servir de repère. 
J'attends la fin de votre essai sur MOP, qu'en est-il 
exactement ? 


L'ECHO 


Simples et utiles ces petites commandes sauront trou- 
ver preneurs… Pour MOP, malheureusement, la situa- 
tion est un peu bloquée puisque la nouvelle version 
attendue pour terminer ce banc d'essai n'est pas arri- 
vée à la rédaction. 


DANIEL ROY 


Comment peut-on formater une disquette en lec- 

teur A pour qu'elle contienne 179 Ko ? 

Que pensez-vous du programme suivant ? 
10 PRINT CHRS$ (27) "E"CHRS (27) "H":FOR 
N=1 TO 30:FOR X=32 TO 76:PRINT CHRS ( 
27) "Y"CHRS (X) CHR$ (138-X)"";" L'ECHO 
DU PCW ";CHR$ (27) "Y"CHRS (X) CHRS (X) 
"";" L'ECHO DU PCW ":NEXT X,N 


L'ECHO 


Pour formater une disquette en lecteur A avec une ca- 
pacité plus grande que la capacité normale, je vous 
conseille d'utiliser le format DONNEES du formateur 
d'HERAKLIOS. Quand à votre spectaculaire pro- 
gramme, l'effet obtenu vient du saut de ligne que 
l'écran provoque à l'affichage d'une trente-et-unième 
ligne. C'est tout simple mais cela vaut le coup d'œil ! 


PIERRE BOYAUX 


Atteint d'une maladie neuromusculaire amyotro- 
phiante, je suis depuis quatre ans, handicapé, para- 
lysé à 80%, trachéotomisé et placé sous respirateur 
électrique (et de ce fait incapable de parler et 
d'écrire). 

J'ai acquis, il y a maintenant deux ans, pour faire 
ma correspondance, un PCW 8256 dont j'ai été très 
satisfait. J'ai,.avec lui, écrit de nombreuses lettres et 
l'ai, accessoirement, utilisé pour jouer aux échecs. 
Par suite d'une agravation de ma maladie, il m'est 
maintenant difficile de bouger les articulations des 
épaules et des coudes sans ressentir immédiate- 
ment une grande fatigue : en conséquence, il me 
devient pratiquement impossible de déplacer mes 
mains le long du clavier. Par contre, j'ai conservé la 
possibilité de frapper les touches avec mes doigts 
(pouce, index et médium). 

J'ai donc cherché à savoir si le PCW pouvait être 


modifié ou complété par un "système" (program- 
me, logiciel, interface, périphérique...) qui permet- 
trait de l'utiliser dans sa fonction traitement de 
texte à partir d'une commande qui ne nécessiterait 
pas un déplacement de main, ne fonctionnant 
qu'avec les doigts (mini-clavier, manette ou autre). 
La société AMSTRAD, consultée, m'a fait savoir 
qu'à son avis un tel système n'existait pas. 
Pourriez-vous m'aider à trouver un programmeur 
ou une société susceptible de trouver une solution? 


L'ECHO 


Votre lettre est un appel à l'ingéniosité et au talent des 
lecteurs qui, j'en suis persuadé, sauront trouver une 
solution à ce problème et, par la même, aider des mil- 
liers de gens paralysés à pouvoir utiliser ce magnifique 
outil. 

L'ECHO vous fera suivre tous les courriers allant dans 
ce sens et continuera à chercher tout ce qui pourrait 
vous aider. 


JEAN-JACQUES LEBLOND 


Je vous écris aujourd'hui car la découverte particu- 
lièrement miraculeuse que je viens de faire ne peut 
rester plus longtemps ignorée. 

Un beau matin, tapotant joyeusement sur mon joli 
clavier, l'idée me prend de sauvegarder le monu- 
ment de programmation (sous basic) que je venais 
de mettre au point. Je frappe donc, de mes petits 
doigts agiles, le classique SAVE "B:NOM'' afin 
d'envoyer cette merveille sur la disquette placée 
dans le lecteur B. 

La vitesse aidant et le SHIFT n'étant pas activé 
(SHIFT LOCK éteint) le guillement se transforma 
en 3. Je corrigeais avec véhémence cette horreur et 
oubliais l'affaire. 

Plus tard, voulant retrouver mon oeuvre, qu'elle ne 
fût ma surprise en ne retrouvant pas mon pro- 
gramme sur la disquette. Après enquète serrée 
auprès des octets concernés, je me rendis compte 
que celui-ci était arrivé en USER 3 ! 

La cause est que dans ma précipitation j'avais omis 
de supprimer le 3 et que l'instruction était deve- 
nue : SAVE "3B:NOM". 

Maintenant vous savez comment sauver dans un 
autre USER sans avoir à se fatiguer... 


L'ECHO 


Encore une astuce qui devrait avoir son petit succès et 
pendant que vous y êtes essayez : DIR 1A:.. 
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MARC PAYEN 


Veuillez trouver l'expression de mon désaccord 
avec ce que vous avez affirmé sur le gestionnaire 
de fichier POCKET BASE de MICROPRO (cf 
courrier ECHO N°21). 

Pour franchir la limite des 16 Ko, voici l'astuce que 
j'ai trouvée : 


Copier la grille en ".DEF" du fichier qui arrive à la 
limite des 16 Ko par PIP. 
Exemple : Pour une grille ENCOURS.DBF faire 
PIP AJOUT.DEF=ENCOURS.DEF 
Enrichir le fichier AJOUT grâce à la commande 
DATASTAR AJOUT que les utilisateurs POCKET 
BASE connaissent. 
Saisir un certain nombre de fiches avec comme but 
le fait que la taille additionnée des fichiers 
ENCOURS.DTA et AJOUT.DTA dépasse 16 Ko. 
Quitter ajout par <ALT E> puis <E> (en fait suivre 
le menu habituel). 
Maintenant l'astuce qui résoud tout! taper: 
FORMSORT ENCOURS AJOUT ENCOURS 
En effet, l'utilitaire FORMSORT sert à trier mais il 
permet aussi de fusionner plusieurs fichiers (la 
documentation précise que le maximum de 
FORMSORT est de 25 noms cf chapitre 4 page 7 à 
10). 
Cette commande FORMSORT ENCOURS 
AJOUT ENCOURS crée un nouveau fichier 
ENCOURS.DTA et un nouveau fichier 
ENCOURS.NDX qui comprennent les enregistre- 
ments de ENCOURS.DTA et ENCOURS.NDX 
arrivés à la limite des 16 Ko et les quelques enre- 
gistrements de AJOUT.DTA et AJOUT.NDX nou- 
vellement saisis. 
Le "miracle" est accompli et vous pourrez vérifier 
avec la commande DATASTAR ENCOURS qu'il 
est désormais possible de continuer d'enrichir le 
fichier ENCOURS.DTA qui ne connaît la limite 
des 16 Ko. 
Attention : l'opération effectuée avec FORMSORT 
écrase les versions précédentes de 
ENCOURS.DTA et ENCOURS.NDX (celles qui 
étaient limitées à 16 Ko). Les fichiers AJOUT.DTA 
et AJOUT.NDX pourront alors être effacés. 
Je souligne que le fameux message "répertoire 
plein" réapparaît à la limite des 32 Ko et qu'il y a 
lieu de continuer d'où l'intérêt de ne pas effacer 
AJOUT.DEF créé. 
En fait, je pense que POCKET BASE n'a pas de 
limite de taille autre que l'adressage du support. 
Avant de vous écrire, j'ai créé un fichier en ".DTA" 
de 99 Ko et ".NDX" de 26 Ko. Je n'ai pas détecté 
d'erreur et tout fonctionne parfaitement avec tou- 
tefois des temps de réponse assez long. La "techni- 
cienne" de MICROPRO devait, en fait, être une 

. commerciale ou alors je viens vraiment de décou- 
vrir une procédure extraordinaire et je demande 





tout de suite des royalties à MICROPRO ! 

Plus sérieusement, je pense que POCKET BASE 
est mal adapté à la gestion des mémoires du PCW 
faite par le CP/M 3.0. 


L'ECHO 


Bel exemple de solidarité avec les utilisateurs déçus du 
POCKET BASE qui grâce à votre intervention pour- 
ront enfin passer la vitesse au-dessus. Je vous précise 
que je n'ayant pas essayé le truc de Monsieur PAYEN , 
les commentaires des expérimentateurs seront les bien- 
venus. C'est peut-être le début d'une rubrique : 

IN THE POCKET ! 


OLIVIER PERS 


Connaissez-vous les adresses et les conditions 
d'abonnement de vos homologues anglais et alle- 
mands ainsi que celles de clubs freeware et autres? 


L'ECHO 


Après enquête, trois journaux se disputent un parc de 
près de 500.000 machines en Grande-Bretagne soit sept 
fois plus important que le parc français. 

Je vous livre adresses et tarifs d'abonnement "oversea” 
(outre-mer pour les anglais !). 


ANGLETERRE 
8000 PLUS 
Edité par : FUTURE PUBLISHING 
4 QUEEN STREET 
BATH BA1 1E] 
TEL 19 44 225 446034 
Prix au numéro:  L 1.75 (19 Francs) 
Abonnement : L 30 (330 Francs) 
AMSTRAD PCW MAGAZINE 
Edité par : DATABASE 
EUROPA HOUSE 
ADLINGTON PARK 
ADLINGTON 
MACCLESFIELD SK10 4NP 
TEL 19 44 277 230222 
Prix au numéro:  L1.25 (14 Francs) 
Abonnement : L 25 (275 Francs) 
YOUR AMSTRAD PCW 
Edité par : FOCUS MAGAZINE 
GREENCOAT HOUSE 
FRANCIS STREET 
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LONDON SWIP 1DG 
TEL 19 44 1 8341717 
L 1.35 (15 Francs) 

L 30 (330 Francs) 


Prix au numéro : 
Abonnement : 


CLUB CP/M 


CP/M USER GROUP 
DEREK FORDRED 

72 MILL ROAD 
HAWLEY DARTFORD 
KENT DA2 7RZ 

TEL 19 44 322 22669 


ALLEMAGNE : 


CPC SCHNEIDER INTERNATIONAL 


Edité par : DMV 
POSTFACH 250 
FULDAER ST. 6 
3440 ESCHWEGE 
TEL 0 56 51 87 02 
Prix au numéro:  DM6 (20 Francs) 
Abonnement : DM 60 (200 Francs) 
FREDERIC ABIGNOLI 


Vous connaissez les fichieïs en SUB qui envahis- 
sent les écrans lors de l'exécution de leur contenu. 
Sur PC et compatibles existe une fonction s'appe- 
lant ECHO qui suivant qu'elle est mise sur ON ou 
OFF permet d'activer ou désactiver l'affichage. J'ai 
créé un petit programme du même nom qui coupe 
ou remet le moniteur en route. Pour les mordus, 
j'utilise le port 248 permettant d'accéder à la liaison 
du moniteur. Si on envoie 8 on coupe l'affichage et 
si on envoie 7 on le rétablit. 

Pour créer la commande ECHO.COM il suffit de 
taper le petit programme basic suivant et de le lan- 
cer après l'avoir sauvegardé (une précaution indis- 
pensable !). Ensuite vous découvrirez que votre 
disquette contient le fichier ECHO.COM dont la 
syntaxe est la suivante : 


ECHO OFF désactive l'écran, ECHO ON le réacti- 
ve et ECHO seul l'efface. 


10 OPEN "R",1,"ECHO.COM",1 | 
{20 FIELD 1,1 AS A$ | 
|30 FOR I=1 TO 44:READ B$:LSET A$=MKI 


| $ (VAL ("SH"+B$) ) : PUT 1,I:NEXT:CLOSE: 





SYSTEM 

40 DATA C3,11,01,1B,48,1B,45,24,11,0 

3,01,0E,09,CD,05,00 

| 50 DATA See | 
| 








8,0C,FE,66,28,08,CD 
60 DATA 08,01,3E,07,D3,F8,C9,3E,08,D 
3,F8,C9 





| 





N'oubliez pas que lorsque vous tapez ECHO OFF 
plus rien n'apparaît à l'écran mais il fonctionne 
virtuellement donc, en mode direct, vous taperez 
ECHO ON <RETURN> en "aveugle" pour rétablir 
la visualisation. 


L'ECHO 
ON! 


Ce genre de petite friandise fait toujours le joie d'un 
PCW glouton. Encore, encore... 


GUY JOLLY 


Au sujet de TOMAHAWK, dont je viens de faire 
l'acquisition, je vous informe que quelques com- 
mandes ont été inversées. Il faut lire : 


<W> gouvernail de direction vers la gauche 
<Z> ouvrir Manette 

<Q> diminuer le pas général 

<A> augMenter le pas général 

et la carte s'obtient par <?> plutôt que par <M> 


L'ECHO 


Voilà un rappel qui n'est pas inutile. Bon vol … 


MACINTOSH ? 
PC & COMPATIBLES ? 


POUR TRANSFERER TOUS 
VOS FICHIERS PCW 
VERS CES MACHINES, 
UNE AUS LIRE 


LE SERVICE ENTREPRISE DE 
Ne, [02104 01, 


tu 59) 
48.65.44.55 








Ses 


. 


a 


La façon de saisir un programme Basic a fait l'objet d'une étude 
approfondie dans l'ECHO du PCW N°1 dans "Un départ saisissant” 
qui reste complémentaire au livre 2 livré avec les PCW. 


Résumé : 


Allumez l'ordinateur et insérez la face 2 de la disquette système. À 
l'affichage de "A>" tapez BASIC suivi d'une pression sur [RETURN]. 
Une fois sous Basic, lancez la numérotation automatique par 


AUTO4+{RETURNI. 


À chaque numéro de ligne affiché, tapez son contenu conformément 


au listing de l'article. 


Pour sortir du mode AUTO afin de corriger une ou plusieurs 


lignes, tapez [STOP]. 


Pour corriger une ligne, tapez EDIT suivi de son numéro et 


d'une pression sur [RETURN]. 
Exemple : EDIT 10 [RETURN] 


Pour lister sans corriger, taper LIST [RETURN] 
Exemple : LIST 10 [RETURN] ou LIST -100 [RETURN] ou 
UST 10 -100 [RETURN] ou LIST [RETURN] 


Faites des sauvegardes régulières du programme, même en 
cours de saisie, en mettant une disquette vierge en À et en 
tapant : SAVE "Nom du programme" [RETURN]. 

Exemple : SAVE "ECHO" [RETURN]. 


CONSEILS : Ne lancez jamais un programme avant d'en avoir 
fait une sauvegarde. Utilisez les mêmes noms que ceux conseillés 
par l'auteur (dans son article ou sur la disquette qui l'accompagne). 
Vérifiez ligne par ligne que ce que vous avez tapé est strictement 
identique à ce qu'indique le listing. Soyez particulièrement vigilant 
dans les cas suivants : Ne confondez pas : point virgule et deux 
points, point et virgule, | majuscule et i minuscule ou ke chiffre 1. 
Respectez : les espaces, les guillemets, les REM et les numéros de 
lignes. Ne modifiez pas un programme avant d'être certain qu'il 
fonctionne totalement. Les erreurs se produisent rarement dans la 
ligne responsable de ceux-ci. Seule SYNTAX ERROR ou erreur de 
syntaxe dans la saisie, arrive dans une ligne mal écrite. C'est pour 
cette raison que le BASIC MALLARD l'édite automatiquement. 
Dans tous les cas, reportez-vous à l'annexe Il du manuel Amstrad. 





CNIETEE LITE ETES TETE SELLE LE LEE EEE EEE EEE TELE EEE EEE EEE ECEE EEE EEE EEE CE EEE EE EE EEE EEE ENS 


En 





CONTAGT 


nouveau pour vous ! Revue 
trimestrielle sur disq + logiciels 
freeware = France PCW Club... 
Rejoignez-nous vite ! docu- 
mentation contre 2 timbres à: 
©. PERS (E21), 16 AV. DU VAL DE 
LOIRE - 45430 CHECY 





© A VENDRE PCW-8512, 512 Ko, 
IMPRIMANTE + LIVRES + JEUX + 
DR GRAPH, LE TOUT ETAT NEUF 
PEU SERVI VALEUR ACHAT 6000 F 
VENDU 3000 F. 

TEL : 34 85 72 85 





© PCWistes, voici enfin du 


CÉREECEEECELCELECE EEE EEE EEE 






VENTE. 


© VENDS LOGICIEL MOP - MBP 
avec son livre, prix : 600 F ou 
échange contre LOCOSCRIPT 2 
+ LOCOMAIL avec sa docu- 
mentation. 

Tél : 47 35 51 80 ( après 18h30 ) 
Melle DUBESSET 





20 CAUSE DOUBLE EMPLOI, 


VENDS CANON X-07 avec 64 
Ko + imprimante quatre 
couleurs + logiciel astrologique 
CERES 2000 - valeur de 
l'ensemble : 10.000 sacrifié : 
2000 F - Tél : 47 22 54 90 








ÉEMPLOE: 


© VOUS AVEZ QUELQUES NOTIONS 
DE PCW, VOUS HABITEZ PARIS OÙ LA 
REGION PARISIENNE, VOUS VOULEZ 
GAGNER 500 F PAR JOUR EN 
TRAVAILLANT QUELQUES WEEK-END, 
ALORS CONTACTEZ RAPIDEMENT 
LOGI'STICK AU 48.65.44.55 


© Informaticien et Electroméca- 
cien de formation (12 et 20 ans 
d'expérience). Ancien agent de 
maîtrise. Habitude du contact 
avec les clients. Cherche place 
Vendeur - Conseiller ou 
électromécanicien d'entretien. 
Régions APT, MARSEILLE, VITROLLES. 
Mr LAURENT J.Paul rue de la Poste 
04110 CERESIE. 





IARIFS ANNONCE 
DEMANDE D'EMPLOI : GRATUITE 
AUTRES RUBRIQUES : 





NOUVEAU : PAYEZ POUR DEUX ANNONCES ET PASSEZ EN TROIS !!! 
- Pour garantir le sérieux des annonces, L'ECHO DU PCW demande 50 F par 


passage où 100 F pour trois parutions. 
- Les rubriques disponibles sont : VENTE, ACHAT, CONTACT, OFFRE DE SERVICE, 

DEMANDE D'EMPLOI, OFFRE D'EMPLOI, CLUB et DIVERS. 
- Les annonces de DEMANDE D'EMPLOI sont gratuites. 


Poldads el dandes 


© GRATUIT... Un catalogue vous 
révèle comment créer votre 
propre affaire de vente par 
corrspondance. Méthode facile 
et hautement lucrative. Ecrire 
à Kost JHA BP 922 90020 
BELFORT cédex. 


© Transfert de fichiers PC-MAC, 
PCW-MAC, PCW-PC,. papier à 
en-tête en continu, Télé- 
matique, programmation sur 
mesure, c'est au service 
entreprise que vous les 
trouverez ! 

inscrivez-vous sans attendre... 


1 Parution : 50 F TIC (dont TVA 18,6%=7,84 F) 


3 PASSAGES : 100 F TIC (dont TVA 18,6%=15,68 F) 
Ligne supplémentaire : 10 F TTC (dont TVA 18,6%=1,57 F) 


Ce bon de commande tient lieu de facture. Gardez-en un double pour votre comptabilité. 
La rédaction se réserve le droit de refuser toute annonce sans avoir à le justifier. Les 


annonces non accompagnées du règlement seront retournées à leurs expéditeurs. 


TEXTE DE L'ANNONCE 


REGLEMENT A L'ORDRE DE LOGI'STICK PAR : 
(] CHEQUE (J CCP (J MANDAT [] VISA/CB 


signaiure obligatoire : 







ANNEXE BASIC / PETITES ANNONCES + L'ECHO DU PCW N° 22 





RTS 
: "ae 7 Ur 


a 
Ne 


EE ——— 
oo 
ETTTTFS.ST-S- = 
oo 
oo 
TT 
oo 
EZTY.-T-= 
oo 
a 
ET 








use 
V CC C 7 


PARTAGER NOTRE SOIF DE QUALITÉ 
EN DÉCOUVRANT NOTRE CATALOGUE 
DE MATÉRIELS ET DE LOGICIELS 


PCW : 8756/8512/9812 





DUPLICATION ET DIFFUSION INFORMATIQUES 


Centre d'Affaires PARIS NORD ‘Le Bonaparte” Boîte 37 - 93153 LE BLANC MESNIL CEDEX 
TEL. (1) 48 67 28 44+ 


VENTE EXCLUSIVE AUX REVENDEURS CONQUERANTS 




















VERSAILLES 


pT. 0 


Pour toutes demandes de renseignements, contactez : 









